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La lingua batte 
dove il software duole 

Per risolvere un prooiema col calcolatore è 
necessario utilizzare il linguaggio più 
idoneo. Quale usare , fra i tanti? E, 
soprattutto , che diavolo è un linguaggio? 


c 

LF i sente tanto parlare di linguaggi, di siste- 
mi operativi, di procedure orientate alia mac- 
china o a li 1 utente e di tante altre belle cose 
che hanno tutte in comune tra toro (oltre al- 
Fintento segreto di far impazzire gli utenti) la 
possibilità di dialogare con rimiratone del 
computer. 

Troppo spesso, però, non si hanno le idee 
chiare sui confini esistenti tra sistema operati' 
vo e linguaggio; oppure si sente parlare, spes- 
so solo per sentito dire, di differenze modeste 
o sostanziali tra un linguaggio e l’altra. 

Per confondere le idee si asserisce, inoltre, 
che il Basic, ormai, non ha più motivo di 


esistere, mentre altri ribattono che il Pascal 
non è proprio roptimum per le applicazioni 
generali. 

Poi bisognerebbe parlare di linguaggi inter- 
preti e compilati, di Forth, di “C’, di Coboi, 
di Fortran, di Assembler, di compilatori e 
decompilatori, di linguaggio macchina e pro- 
cedure di ingresso uscita che richiederebbero 
linguaggi e accorgimenti più idonei 

In tutto queto parlare, Phobbysta l ‘medio* 
non può che rimanere disorientato, specie se 
principiante. Chi ha appena, con orgoglio, 
digitato un mini listato da una riga e ne è 
soddisfatto, cade nella disperazione più pro- 


fonda leggendo che il Basic deve abbandonar- 
lo al più presto se vuole restare al passo con i 
tempi. 


Chiariamoci te idee 

Sarebbe opportuno ricordare che alla base 
di tutto c’è solo il microprocessore, polente e 
veloce aggregato di microcircuiti elettronici 
talmente miniaturizzati da esser concentrati 
in pochi millimetri quadrati di silicio. 

“Attorno" al mieto vengono posizionati al- 
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tri circuiti integrali in parte indispensabili, m 
parte ‘'optional”. 

M mitro, in effetti, non può quasi mai fun- 
zionare da solo e richiede per il suo corretto 
funzionamento altri componenti elettronici. 
Tra i primi figura il quarzo che, opportuna- 
mente eccitato, genera una frequenza che sa- 
rà tenuta come riferimento per la cadenza 
delie operazioni da compiere. Il quarzo rap- 
presenta il cuore che, con i suoi battiti, eon- 
scnle al sistema di vivere. 

Alcune elaborazioni compiute dal mieto 
devono esser memorizzate da qualche parte 
perchè, in seguito, saranno riprese dallo stes- 
so micro ed elaborate ulteriormente. 

Facciamo un paragone con una calcolatrice 
tascabile: se questa ha poche memorie (spes- 
so ne hanno addirittura una sola) il suo utiliz- 
zo è notevolmente limitato perchè se, in un 
gruppo di calcoli concatenali, risulta necessa- 
rio utilizzare più dati precedenti, è indispen- 
sabile scriverli a parte, ad esempio su un fo- 
glio di carta. 

Coti ciò vogliamo solo asserire che la me- 
moria di un calcolatore è indispensabile per 
un suo corretto funzionamento c. ovviamen- 
te. più memoria c'è, più “cose” è possibile 
fare. 

r>i memorie, come è noto, esistono diversi 
tipi, tra cui: 

• RAM in cui è possibile scrivere un dato, 
leggerlo, cancellarlo o modificarlo; 

• ROM in cui è solo possibile leggere dati 
Questi, naturalmente, sono stati ' scritti” in 
fabbrica e non è possibile modificarli; 

• PROM in cui è possibile scrivere dati (me- 
diante un particolare apparecchio chiamato 
programmatore di Eprom) e successi va men- 
te, dopo averla insema nel calcolatore, sarà 
possibile leggerli. Volendo, questo tipo di 
memorie possono esser cancellate e riutilizza- 
te in altro modo. 

Continuando nel paragone col corpo uma- 
no, come il quarzo rappresentava il cuore, 
cosi le ROM (o le EPROM) possono esser 
considerale la struttura cerebrale comune a 
tutti gli esseri umani. Le ROM sono, in altre 
parole, le cellule del cervello in eoi sono me- 
morizzate le informazioni relative al cammi- 
nare, al vedere, gli slimoli della fame, della 
sete, la possibilità di articolare le braccia, 
eccetera, 

Le memorie RAM, invece, possono esser 
paragonate alle informazioni che il singolo 
essere umano acquisisce durante la sua esi- 


stenza, Le informazioni ricevute da un uomo 
durante uno spettacolo televisivo (e gli stimoli 
che ''elabora”), ad esempio, sono completa 
mente diverse da quelle che, nello stesso mo- 
mento, percepisce un altro essere umano che 
legge un libro. 

I due tipi di informazioni, comunque, pos- 
sono esser memorizzati grazie alla funzione 
della vista, alla esistenza di memoria disponi- 
bile, ai cuore che batte e al cervello che, gra- 
zie ad esso, funziona c sovrintcnde alle varie 
operazioni di memorizzazione 

Oltre al micro. alle ROM e alle RAM , do- 
vano posto, alTintcmo del calcolatore, anche 
i circuiti integrali relativi all'Ingresso e all'u- 
scita delle informazioni, detti I/O dall’inglese 
Input Output. 

E‘ indispensabile, infatti, non solo intro- 
durre informazioni nel sistema, ma anche far- 
le uscire. Tutto questo perchè il sistema sia 
considerato non solo “intelligente" ma anche 
funzionante. 

Le orecchie, gii occhi, il palato e tutti gli 
organi preposti a [l'individuazione dei cinque 
sensi sono, a tutti gli effetti, gli strumenti di 
ingresso del nostro corpo, 

La parola e i gesti, al contrario,, ne rappre- 
sentano quelli di uscita 

Senza uno strumento di ingresso, infatti, il 
sistema non può funzionare pur se perfetta- 
mente in ordine. Analogamente un sistema 
privo di organi di uscita non serve a nulla 
perchè, tra l’altro, non è possibile stabilire se 
sta funzionando oppure no. 

Chi è cieco dalla nascita può egualmente 
ricevere, ed elaborare, informazioni grazie 
agli altri quattro sensi di cui dispone. Allo 
stesso modo un muto può comunicare con 
gesti, con carta e penna e. perchè no?, con un 
terminale computerizzato. 

Chi invece, dalla nascita, è privo dei cinque 
sensi oppure ha la disgrazia di non poter uti- 
lizzare gli organi di Output (in seguito, ad 
esempio, a una paralisi totale) non può elabo- 
rare dati, a causa della mancanza di ingressi, 
oppure non può evidenziare ciò che ha elabo- 
rato. Solo sofisticate tecniche di analisi, rela- 
tive allo studio di impulsi cerebrali, possono 

s 

stabilire se un essere umano, che si trovi in 
una situazione cosi infelice, è da considerarsi 
vivo oppure no. 

Allo stesso modo un calcolatore dotato dei 
soli organi di ingresso (tastiera, penna ottica, 
joystick, eccetera) non potrà esser utile se 
privo di strumenti idonei a evidenziare il risul- 


tato delle sue elaborazioni (video, stampante, 
drive per floppy, ploticr c ahn apparecchi) 

Ino zoo iti stilla menu uri» 

Che Centra quello che abbiamo detto con i 
linguaggi e i sistemi operativi * 

La faccenda assume un significato ben pre- 
ciso se teniamo presente che un byte, vale a 
dire una cella di memoria, può contenere in- 
differentemente un dato oppure un'istru- 
zione, 

[I numero 4, tanto per fare un esempio 
banale, può rappresentare un indice (il quarto 
libro sullo scaffale) oppure un ordine, come il 
tasto “4' presente m un ascensore che, se 
premuto, “ordina” di salire al quarto piano di 
un edificio 

Anche nel linguaggio Basici! numero 4 può 
assumere diversi significati: numero di tinca 
(4 PRINT'PIPPCV ) T parte di nome di varia- 
bile (A4=150). carattere alfanumerico all’in- 
temo di una stringa (PREMI IL TASTO 4 
PER CONTINUARE). 

Continuando con l’analogia, un gruppo di 
istruzioni può appartenere, o meno, al pro- 
gramma principale oppure a un sottopro- 
gramma: l'unico modo per stabilirlo consiste 
nel ricercare il comando Return al termine del 
gruppo di istruzioni., 


Viaggio nel micro 

F'ìiihI mente arriviamo al nocciolo della que- 
stione: qualunque sia il computer utilizzato, 
qualunque sia il sistema operativo inserito, 
qualunque sia il linguaggio selezionato, ciò 
che conduce ai risultati desiderati è sempre e 
soltanto il microprocessore, te me mone e il 
sistema di I/O, 

Ciò significa che il Basic come il Pascal 
sono, alla fine dei conti, una serie di istruzioni 
in Linguaggio Macchina raggruppate in modo 
tate da accettare dati in ingresso e presentarne 
altri in uscita. 

Considerando il linguaggio Basic, per re- 
stare in un campo familiare al notino lei dorè, 
un'istruzione del tipo PRINT'PIPPO” è for- 
mata da un numero (153) che rappresenta il 
comando PRINT, un altro numero che indica 
il carattere di virgolette (34) e altri numeri 
che, secondò il codice ASC II, indicano i ca* 
rattcn alfanumerici (80, 73, 80, 80. 79). 
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Quando premiamo il tasto Return una par- 
te del calcolatore <n incarica di esaminare e di 
interpretare quella particolare successione di 
numeri II nome PIPPO, insomma, potrebbe 
venir fuori anche senza ricorrere a! Basic ma, 
magari in modo più scomodo, inserendo con 
altro sistema una serie di dati all'Interno del 
calcolatore, 

Vediamo ora di riassumere il discorso: 

9 il microprocessore necessita sempre, per 
funzionare, di istruzioni in linguaggio macchi- 
na poste in successione logica c coerente; 

9 il mìcro non può in alcun modo sapere se il 
gruppo di istruzioni che sta eseguendo in un 
particolare momento fa parte di un linguag- 
gio, di una procedura di I/O oppure dei siste- 
ma operativo; 

9 affermare che. in un computer, la memo- 
ria è organizzata, ad esempio, in blocchi di- 
stinti contenenti il sistema operativo in 32K, il 


linguaggio interprete in 8K ed il sistema di I/O 
in 4K, £ solo una semplificazione di comodo: 
non esistono istruzioni (in linguaggio macchi- 
na) specifiche per il funzionamento del Basic, 
del sistema operativo oppure delle I/O; 

9 in molti casi, proprio grazie alle considera- 
zioni precedenti, è possibile sostituire circuiti 
integrati ROM, aggiungerli (come nel caso di 
cartucce da inserire nel retro de! computer), 
modificarli dopo averli ricopiati su memoria 
RAM e cosi via. 

Concludendo 

Il calcolatore deve esser considerato come 
un fascio vibrante di nervi che, opportuna- 
mente stimolati, conducono ai risultati voluti. 

Le memorie ROM non devono esser "vi- 
ste" come blocchi distinti e completamente 
separati tra loto: niente di male se, disasse m- 


filandole, vi accorgete che una parte L.M, 
dell'Interprete Basic utilizza una subroutine 
L.M, del sistema operativo e viceversa. 

Se risulta del tutto normale, alterando op- 
portunamente alcune zone di memoria, ag- 
giungere nuove istruzioni al linguaggio oppu- 
re se, addirittura, si può modificare il sistema 
operativo o far funzionare apparecchi di vo- 
stra realizzazione collegati al computer, ciò t 
dovuto solo al fatto che il modo di funzionare 
di un calcolatore^ basato sull ìnguaggio speci- 
fico del microprocessore in esso impiegato, d 
Li n guaggio M acehina 

Tutto il resto (linguaggi evoluti, sistemi 
operativi, apparecchi di rice-trasmissìone) 
non sono altro che comodità introdotte dal- 
l'uomo per facilitare il colloquio con la mac- 
china sfruttando abilmente le risorse, davvero 
infinite, del cervello al silicio, 

Alessandro de Simone 


ATTENZIONE!!! 

A tutti i 

Commodore Computer Club 

Molti circoli si sono aperti e molti sono usciti allo ' scoperto - ' dopo il nostro invito ad aprire un Computer Club, apparso sul N. 21 di C.C.C. 

Allo scopo di rendere un servizio migliore ai nostri lettori che intendano contattare uno di questi simpatici circoli culturali, i segretari dei circoli 
stessi sono pregati di compilare il seguente tagliando, o sua fotocopia, e di inviarlo in busta chiusa (affrancata secondo le vigenti tariffe postali) a: 

Systems Editoriale 
Servigio Notizie Computer Club 
Viale Faxnagnsta. 75 
Milano 

La completa compilazione dell'intera scheda, è INDISPENSABILE per ta pubblicazione gratuita sulla nostra rivista 

? 

Nome de ì d u b . i,, ^ , Sede del club . ,,h«,r-i++,i'+ì, , a ■ , , , , , 

f 1 ,, * + + »■,, , + + ,! + + + ■ ■ C^lttà + M + PtOV, , i, J tu,,, T C I . PrfiflSMÌ j hi , .... . , , _ h .... , , , ..... 

Presidente; . — Segretario: N, soci fondatori; 

N di soci finora iscritti: Data di fondazione; Giorni di apertura della sede: 

Orario di apertura: Computerà disponibili (specificare): 

Periferiche disponibili (specificare): : Programmi disponibili (N. approssimativo): .. 

Videogiochi N.: Professionali N. : Biblioteca tecnica N. volumi: 

N abbonamenti a riviste italiane: N, abbonamenti a riviste straniere: Quota di iscrizione L 

(Specificare se annuale, mensile eoe.) 

Attiviti) previste: Bollettino periodico emesso: Attività già svolte: 

Eventuali sponsor: Disponibilità alla sponsorizzazione (sì/no): 


i e .1 a ■ e ,e il J 4 ■ e e 4 a h a | . 


Il sottoscritto , presidente del Computer Club autorizzo la Systems Editoriale a diffondere notizie riguardanti 

le attività del circolo culturale citato anche se pervenute in redazione in via non ufficiale. 

Dichiaro inoltre che le informazioni comunicate corrispondono al vero e che, in caso di difformità accertata da parte di incaricati della Systems 
stessa , Commodore Computer Club, allo scopo di tutelare la buona fede degli utenti della rivista, si riserva il diritto - dovere di avvertire i propri 
lettori nel modo e nella forma che riterrà più opportuni. 

In fede 
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GIOCHI 

RECENSIONI 


Il braccio e la mente 


Zzzz (C/64 C/128) 



Si chiama proprio cosi (Zzzz) 
c il motivo è da ricercare nei fat- 
to che si tratta di un ad venture 
‘‘onirico 1 *, Si suppone che vi siale 
addormentati c che nel sogno, 
dobbiate raggiungere.,. no, non 
ve io diciamo. 

Zzzz è un adventure simpati- 
camente sofisticato; a parte le 
numerose schermate in alta riso- 
luzione (una per ciascuna “stan- 
za” e, qualcuna, perfino anima- 
ta), il gioco si avvale della parte 
destra e sinistra dello schermo 
per far apparire delle “icone". 
Queste sono immagini che ricor- 
dano le funzioni selezionabili dal 
giocatore. Posizionandosi col joy- 
stick su una delle icone e pre- 
mendo il pulsante Fire, compaio- 
no, nella parte inferiore dello 
schermo, i messaggi che consen- 
tono al giocatore di effettuare le 


decisioni più opportune, E' possi- 
bile prendere o abbandonare (e vi 
verrà detto se potete farlo); esa- 
minare (la situazione creatasi e 
nella quale vi trovate); richiedere 
una pausa o interrompere il gioco 
(registrando su nastro il “punto” 
in cui siete per riprenderlo in se- 
guito); chiedere aiuto (help); ot- 
tenere la descrizione di avveni- 
menti particolari, eccetera. 

L’advenfure, che si carica in 
poco più di 132 giri, è scritto in 
inglese. Questo fatto, però non 
dovrebbe esser considerato un 
“difetto” ma, al contrario, un in- 
centivo piacevole per imparare, o 
perfezionare, una lingua stranie- 
ra. 

E* il caso di dire che si può 
unire futile al dilettevole grazie a 
un gioco: chi favrebbe mai det- 
to,,. 


Collapse (C/64 C/128) 

^Juesto gioco su nastro, che si 
canea in poco più di 100 giri e 
che richiede il joystick, può esse- 
re definito una specie di Pac-man 
“evoluto”. 

Mancano effetti tridimensio- 
nali, ma una simpatica animazio- 
ne supportata da numerosi suoni 
e rumori e, soprattutto, la note- 
vole varietà di schermate possibili 
(ben 961 ) rendono piuttosto in- 
teressante il nuovo videogame 
proposto dalla Mastertronic, 

Descrivere i] gioco è piuttosto 
difficile perchè si tratta di far 
cambiare di colore, toccandole, 
delle aste il cui numero e la cui 


disposizione cambiano notevol- 
mente a seconda della difficoltà 
impostata, 

E’ necessario non solo cam- 
biare il colore delle aste (in un 
tempo, tra l altro, piuttosto con- 
tenuto) ma evitare di entrare in 
collisione con alcune figure che, 
urtandovi, vi sottraggono, come 
penalità, tempo prezioso. 

Quando, finalmente, tutte le 
aste sono colorate, è necessario 
urtarne una iti modo tale che 
questa, ruotando (grazie a una 
realistica animazione) urti quella 
adiacente e questa, a sua volta, 
quella successiva, fino all’ultima. 

Sicuramente avrete visto quel 
gioco che si realizza, appunto si- 
stemando in piedi piccole tavo- 
lette di plastica in modo tale che, 
facendo cadere la prima, si inne- 
sti una reazione a catena che por- 
ta rapidamente al fa [sbattimento 
di tutte le altre. 

Molto più complicato di 
quanto non possa sembrare a pri- 
ma vista, Collapse è un videoga- 
me da non sottovalutare. 
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Personal Computer è la nuova rivista Systems per gli utenti Commodore, MSX, 

Sinclair* O :=7Trr=' 

Dai mese di gennaio in edìcola, 128 pagine a sole 3(300 lire: allo stesso prezzo, la vostra 
rivista, ìntegra e migliorata, e molto di più. 

Non solo tre riviste per tre diversi utenti: Personal Computer è anche un'idea nuova H mercato Si evolve* 

per far comun icare tutti gii hobbist l An che noi* 

Personal Computer: 128 Kbytes di rivista, tutti i mesi in edìcola. 





Su ogni numero di Commodore 
Computer Club compaiono un 
paio di pagine dedicate a una 
dozzina di micro programmi 
lunghi una sola riga. 

E 1 ovvio che non è possibile 
pretendere effetti sorprendenti 
in listati cosi brevi, tuttavia, svi- 
luppando ridea su cui gli stessi 
programmi son basati è possi- 
bile pervenire a realizzazioni di 
tutto rispetto ricorrendo, è inu- 
tile dirlo, a qualche riga in più. 

Particolarmente interessanti 
per i principianti, spesso utili 
anche per gli esperti, i micro 
programmi di una sola riga rap- 
presentano una valida “pale- 
stra' per abituarsi a concentra- 
re in poche, essenziali istruzio- 
ni la soluzione di problemi 
complessi solo in apparenza. 





Anche i mini-listati dì questo 
numero sono opera di Michele 
Maggi che, stufo del suo fiam- 
mante C-128, io ha recente- 
mente sostituito con un 128-D 
(quello, per intenderci, col dri- 
ve 1571 incorporato...). 


Per Commodore 64 


#1 


List reset (C-64). ChiTavrebbe mai detto 
che, con una sola riga, era passibile pro- 
teggere i vostri listati? Basterà, infatti, 
che le Istruzioni contenute in questo mini 
programma siano attivate affinchè un 
tentativo non autorizzato di Lisi dìa co- 
me risultato il reset del sistema. 

Ai più esperti diremo che viene altera- 
to il vettore di List ponendo, in sua vece, 
il vettore del System Reset. 

Sarà sufficiente dotare i vostri pro- 
grammi di un auto-run in cui la prima 
riga di programma contenga le istruzioni 
pubblicata: chi tenterà di listare i vostri 
programmi avrà una sgradevole sor- 
presa! 

1 POKE 774 ,086: POKE 
775 , 858 : PR I NT "PR 
QUA A FARE IL Li 5 
I” 


# 2 


Restare reset (064), Anche questa riga, 
attivata, altera un vettore. Sarà in segui- 
to sufficiente premere contemporanea- 
mente i tasti Run/Stop e Resi ore per 
avere lo stesso effetto dello spegnimento 
e riaccensione della macchina. Utile per 
inserire protezioni a LI "interno dei vostri 
listati. 


1 POKE 798 t 886 : POKE 
793 , 058 : PR I NT "PR 
QUA A FREMERE RUN 
/STOP E RESTORE . . 


# 3 


Aspetta tasto l(. -64) Per creare una pau- 
sa, all'interno di una routine, si ricorre 
quasi sempre ai] * istruzione GETA$ che 
richiede, in genere, un paio di righe. E’ 
perciò possibile, in una sola riga, ricorre- 
re airismuriooe WATT che obbliga il 
computer a interrompere ("esecuzione 
dei programma Basic finché la locazione 
dì memoria indicata dall"*argomento” di 
Wait non assume un certo valore. E* ov- 
vio che, nel nostro caso, la locazione è 
quella che viene modificata premendo 
un tasto qualsiasi. 

I PR X NT "PREM 1 UN TA 
STO** : POKE 138,0: 
WATT 130,1 


#4 


PR1NT Àt. Digitando questa semplice 
riga, si posiziona il cursore nel punto in- 
dicato dello schermo. La locazione 211 
contiene il numero relativo alla colonna 
(da 0 a 39) e la 214 quello relativo alla 
riga (da 0 a 24). La SYS “dialoga” diret- 
tamente col sistema operativo che posi- 
ziona il cursore nella posizione desidera- 
ta, Attenti a non superare i valori sugge- 
riti, altrimenti possono accadere cose 
“strane",. . 

1 INPUT "COL , RIGA' 1 i 
C, R: POKE all ,C; PD 
KE 214, R: SYS58640 
: FRINT^ECCDMI IN” 

C; R 


#5 


NEW con poke. Un computer Commo- 
dore, per sapere se nella sua memoria 
RAM è allocato un programma, esamina 
La presenza di tre zeri consecutivi, nell'a- 
rea destinata alToccupazione di listati 
Basic. Pokando, appunto, il valore zero 
proprio nelle prime tre locazioni di tal 
area, il computer riterrà, erroneamente, 
di non avere alcun programma al suo 
intemo. Utilizzata in modo intelligente, 
questa considerazione può tornare utile 
ne IP impostare protezioni di programmi. 

1 PR INT "PRQUA A FAR 
E IL LIST" : POKE 0 
048,0: POKE 8049,0 
:POKE 8050,0 


#6 


Caratteri colorati. (C-64). Tutti i caratte- 
ri del C-64 in tutti i colori possibili. Il 
tutto in una sola riga. 

1 FOR 1-0 IO 055: PO 
KE 1084+ 1 , I : POKE 
55896+ I , I : NEXT 


#7 


Scroi fine (C-64). Pochi comandi per ini- 
ziare uno studio approfondito sulla ge- 
stione dello scrolling del C-64. Eventuali 
messaggi, insomma, viagge ranno dal 
basso verso Tallo a “scatti” di un dot 
(puntino elementare) invece che di una 
riga interna. Durante il funzionamento, 
si notano fastidiosi sfarfallo , Ma che cosa 
si può pretendere con un pugno di 
istruzioni? 

1 FOR X-03 TO 16 ST 
EP ”1 : POKE 53865, 

X : FOR T-l IO 500: 
NEXTT : NEXTX 
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Per Commodore 16 


# io 


# 12 


#8 


Cerchi (C-lh) Potete tentare di ipnotiz- 
zarvi ne) guardare il disegno che ha origi- 
ne sfruttando in modo intensivo l’istru- 
zione Orde, 

1 GRAPH 1 Gl t 1 ; 

FORT" 1 TQR00STEP5 : 
CIRCLE1 , 160 , 100 , T , T 
: NEXT 


#9 


insegno (C-tb), Un pianeta? L'orbita di 
una cometa? Un’anguria tagliata a fette? 
Fate un po' voi.,, 

1 GRAPHIC1 , 1 : 

FORT- 1 TO200STEF15 : 
CIRCLE1 , 160, 100,1,60 
: NEXT 


Typewritef (C-16). Volete un mini- 
microtejtt -editor da usare con la vostra 
stampante? Cinque istruzioni sono suffi- 
cienti. Provare per credere. 

1 QPEN4 , 4 : GETXEYAS 

: PR INTAS ; : 

PR 1NT#4 , A$ ; 

: RUN 


# 11 


Caratteri (C-16), Una riga un po’ banale, 
ma preziosissima per chi ha appena com- 
prato il C-16 oppure il Plusy4, Ricordate 
anche voi i bei tempi lontani quando, per 
la prima volta, avete sfiorato la tastiera 
di un computer? 

1 FOR I “0TOB55 : 
POKE307E+I , I 
: NEXT 


Pop arti (C-16). Gruppi sparsi di rettati- 
goli casuali grazie all 'istruzione BOX. 

1 GRAPH 1 CI , 1 : 
FGRT“ÌTO60; 

CIRCLE1 , 4*1, 4*T, 
INTCRNDC03 *£00 ) , 

I NT £ RND £01*1005 
: NEXT 


#13 


Pop art2 (C-16). Basta cambiare poche 
cose, rispetto alla riga precedente, per 
ottenere un effetto sostanzialmente 
diverso. 


1 GRAPHICS!: 

FC3RT- 1TQS0 : 

BOXI , I NT C RND £05 *£00 5 , 

1 NT £RND£ 05*1005 , T t 3*T 
: NEXT 


Nota Bene 

Alcune righe tra quelle pubblicate sembrano possedere più di 80 caratteri e, come tali, inaccettabili dal computer 
Nei casi in cui ci sì accorga che la riga è troppo lunga, è necessario ricorrere alle abbreviazioni dei comandi cosi come indicato 
nell appendice specifica riportata nel manuale dei computer in vostro possesso. 

Ad esempio invece di scrivere PRfNT è possibile abbreviare coi punto interrogativo (?) invece di POKE potete scrivere il 
carattere "P 1 ' seguito dal carattere che viene visualizzato premendocontemporaneamente il tasto shift insieme con Q K Tutte le 
abbreviazioni possibili, lo operiamo, sono riportate in una delle appendici di qualsiasi manuale Commodore 
Nel caso sbagliate a digitare i microiistati che superano, in lunghezza, gli ottanta caratteri (SYNTAX ERPOP o altri tipi di 
e rare), è necessario, per sicurezza, ribatterli per infero e non apportare modifiche alla riga vssuatoata con r istruzione LIST 


La partecipazione dei lettori è gradita e compensata, in caso di pubblicazione, con materiale della 
Systems editoriale (libri, fascicoli arretrati, abbonamenti, eccetera). 

inviate le vostre 1 RIGA, purché nella misura di almeno dieci per volta. Non ci è infatti possibile 
raggruppare i (moltissimi) mie ro- programmi che pervengono singolarmente in Redazione. 

Inviate i vostri lavori su carta, (meglio se su nastro) corredati, ciascuno, dì una breve spiegazione sulla 
funzione che compiono, proprio come li vedete pubblicati in queste pagine. 

Ricordate di indicare chiaramente nome, cognome, via e città, e indirizzate a: 

Commodore Computer Club _ _ Viale Famagosta, 75 

SYSTEMS EDITORIALE Rubrica "1 Riga 20142 MILANO 
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1 listati della 
Systems Editoriale 


n'elevata percentuale dei nostri let- 
tori è alle, prime armi nel mondo dell ‘in- 
formatica e incontra difficoltà nel digita- 
re i programmi da noi pubblicati 

i caratteri “speciali 11 bianchi su fondo 
nero (semi -grafici in “reverse") che rap- 
presentano precisi comandi per i compu- 
ter Commodore sono riportati nel listato 
di esempio a sinistra così come appaiono 
digitandoli su video o su stampante, 
mentre a destra come li rappresentiamo 
nei nostri listati 

La riga 360, ad esempio, deve cosi es- 
ser interpretata; 

dopo aver battuto il carattere di virgolet- 
te {“) che si ottiene premendo il tasto 
SHIFI insieme coti il tasto 2, è necessa- 
rio battere U carattere CRSR DOWN (il 


Pur ricordare in che modo vengono 
normalmente visualizzati i caratteri spe 
ciali, nella seconda parte delle righe di 
sinistra (dop< 


tasto, cioè, che lìoimalmente spostereb- 
be il cursore nella cella video 
sottostante ). 

Analogamente* nella riga IH!) del lista- 
to “tradotto” (di destra), il termine [NE- 
RO] sta a significate che bisogna utilizza- 
re il carattere speciale del colore nero 
(tasto C TRL insieme con il tasto L vedi 
listato), 


riportati i 

tasti che è necessario premere per cute- 
nere il carattere-comando “speciale' 


l a Redazione 
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100 REM I CARATTERI SPECIALI 

110 REM DEI COMPUTER COMMODORE ' 

120 REM COME APPAIONO NORMALMENTE ' 

130 REM SU VIDEO O SU CARTA. 1 

140 PEM <C T RL = TASTO CONTROL ) 1 

150 REM (CfTJR * TASTO COMMODORE) [ 

160 REM (CRSR = TASTI CURSORE) ! 

170 ; , 

1S0 PR INT*B“ :REM CTRL+I NERO i 

190 PRINT" a*! REM “ +2 BIANCO 1 

500 PR I NT ■ H" ! REM * +3 ROSSO ' 

210 PR INT’fc." : REM * +4 AZZURRO [ 

220 PR INT* 31" : REM " +5 PORPORA , 

230 PR I NT *y* : REM * *6 VERDE t 

240 PRINT'3" iREM " +7 BLU I 

250 PR INT"H* * REM * +6 GIALLO I 

260 PRINT*a*:REM * +S REVERSE ON I 

270 PR INT "S* : REM " +0 RE VERSE OFF | 

260 PR INT’3" ! REM CMDR + 1 ARANCIO I 

290 PR INT “il" : REM " +2 MARRONE 1 

300 PR INT "O* ! REM " +3 ROSSO CHIARO 1 

310 PR INT’H" : REM " +4 GRIGIO 1 1 

320 PR INT*y* ■ PEM " +5 GRIGIO 2 1 

330 PR !NT“H* ! REM " +6 VERDE CHIARO 1 

340 PP INT *13" S REM " +7 BLU CHIARO I 

350 PRINT*"»" ìREM ■ +8 GRIGIO 3 1 

360 PR INT "B" 1 REM CRSR IN BASSO 1 

3"?0 PR INT"H* !REM CRSR, A DESTRA 1 

360 PP INT"C3” i REM CRSR IN ALTO 1 

390 PR INTUII* ! REM CRSR SINISTRA 1 

400 °P INT “S|" ! REM HOME j 

410 PRINT'J" ;REM CANCELLA SCHERMO 
426 t | 

430 REM ESEMPI 01 V ISUALIZZ AZ IONE i I 

440 l — r~i cancella schermo, , 

450 t REM CRSR DUI4 DUE VOLTE , 

460 : REM CRSR DESTRA TRE " | 

470 * I 

480 PRINT**!»” tREM BIANCO, CRSR SINISTRA , 

490 « iREM DUE VOLTE E CRSR DLW | 

500 t (REM UNA SOLA VOLTA i 


100 REM I CARATTERI 
110 REM SFECI ALI! COME 
130 REM VENGONO INDICATI 
130 REM SULLE RIVISTE: 
140 REM COMMODORE 
150 REM E COt'WODORE 
ISO REM COMPUTER CLUB. 
170 : 

1S0 PR INT" [NERO! " 

198 PR I NT "IBI ANCO I " 

£00 PRINT "CROSSO 3" 

218 PRINT " CA2ZUR I * 

£20 PRINT" [VIOLA 1 * 

£30 PR INT" [VERDE 1 " 

£40 PR INT" (BLEU] “ 

£50 PRINT" (GIALLO!* 

2S8 PR INT" CRVS 1 " 

270 PR INT" [RVOFP 1 ■ 

2S0 PR INT" [ARANO 3 " 

290 PRINT" (MARR I " 

300 PP INT" [ROSA] " 

310 PRINT" [GRIGIO II* 

330 PPINT" IGRIGI02! " 

330 PR INT" (VERDE2 J " 

340 PR »N7" iCELESTE I * 

350 PRINT" IGRlG 1031 * 

360 PR INT" [DOWN! " 

370 PP INT" [R IGHT J * 

360 PRINT" [UPI* 

330 PRINT" ILEFT!" 

400 PRINT" [HOME!" 

410 PRINT* [OLEARI " 

420 t 

430 REM ESENTI 
440 PRINT* [CLEARU2 DOWN] 
[4 R IGHT1 * 

450 ! 

460 l 
470 ! 

480 PRINT* [BIANCO J [2 LEFT 
] [DOWN! “ 
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DIDATTICA 

COMMODORE 128 


Sistema operativo, 
chi era costui? 

Pc-Dos, CP/M-80, MS-DOS, PCOS, chi non 
ha sentito almeno una volta uno di questi 
■ nomi? Sono tutti sotto io stesso 
denominatore: sistema operativo, SO per gli 

a ffezionati alle sigle . 

di MX.Nitti - O.K.Matturro 

P 

M. arìando di C-64 o Vic-20, spuma qua 
e là t! termine Kemal, A volte si accenna 
alle mutine di sistema (quale sistema?), 
ma , da quando è venuto alla luce il Com- 
modore 128, le sigle di cui sopra e la 
definizione "sistema operativo” sono di- 
ventati termini comuni anche se, come 
spesso accade, non tutti sanno che 

Ci siamo posti, quindi, il problema di 
fare luce su questo "mistero” per accon- 
tentare quelli che "non sanno" e quelli 
che sanno poco, visto che il sistema ope- 
rativo concorre in misura fondamentale 
alla definizione delle caratteristiche di un 
computer. 

Una definizione 

Buona parte delle attività di un elabo- 
ratore consiste net trasferimento di infor- 
mazioni tra il microprocessore (cervello 
della macchina) e le periferiche (drive, 
stampanti, registratori, plotler, eccete- 
ra ) e nel controllo di queste ultime. 

Per espletare tali funzioni non bastano 
le parti fisiche, definite anche col termi- 
ne hardware, ma sono necessari pro- 
grammi particolari scritti nel linguaggio 
specifico del microprocessore, che poeti 
ha a che fare col Basic. 

Possiamo definire sistema operativo 
! insieme di questi programmi. 

Per esempio, quando chiediamo al cal- 
colatore di espletare una funzione come 
quella di Loading (caricamento di un 



programma), utilizziamo il comando 
LOAD del Basic, Questo, a sua volta (e 
senza che ce ne rendiamo conto) esegue 
una routine dell'interprete Basic che 
provvede, appunto, al caricamento uti- 
lizzando a sua volta le routine del sistema 
operativo che sovra in tendono all'intera 
operazione.. E 1 un po' come il gioco del 
telefono in cui i numerosi partecipanti 
devono dirsi in un orecchio. Furi l'altro, a 
turno, una parola. Nel caso del compu- 
ter, ovviamente, i risultati sono più 
affidabili, 

N comando LOAD, quindi, corrispon- 
de a una routine (programma) in lin- 
guaggio macchina che utilizza alcune del- 
le routine (ancora programmi) che costi- 
tuiscono il sistema operativo. 


Da questo gioco di parole risulta che lo 
stesso interprete Basic dipende dal SO. 
Questo deve quindi essere scritto in fun- 
zione del sistema sul quale dovrà 

"girare". 

Dimmi; che SO usi e ti dim chi sei 

A questo punto risulta chiara l’impor- 
tanza del sistema operativo: sovraintep- 
de all uso ticll'hardware e quindi dalla 
sua “bontà" dipende I esaltazione delle 
caratteristiche del microprocessore: da 
esso dipendono anche i linguaggi di prò 
gram magione e da questi ultimi la qualità 
delle applicazioni. 

E' inutile installare un ottimo motore 
in una carrozzeria inadeguata e tale, co- 
munque, da non sf ruttare appieno le doti 
del propulsore. Viceversa, da un motore 
di modeste prestazioni è possibile ricava- 
re un’ottima autovettura, se si studiano 
nei minimi particolari tutti gli accorgi- 
menti che esaltano i pregi e,,, ne mini- 
mizzano i difetti. 

Il successo commerciale di un sistema 
operativo dipende da una catena di parti- 
colari che si fondano in parte sulla quali- 
tà del chip (microprocessore) e, soprat- 
tutto, sull’ uso che ne fa il SO. 

Software di base 

Et sistema operativo è quindi un insie- 
me di procedure così come lo è l'inter- 
prete Basic: entrambi appartengono a 
una categoria di programmi detti softwa- 
re di base. Questi possono essere definiti 
come gli accessori necessari al funziona- 
mento e all'adeguato sfruttamento delle 
risorse del microprocessore, 

Negli home computer (C-64, Vic-20) ‘ 
questi software risiedono permanente- 
mente nella memoria, anzi in una parti- 
colare memoria installata dal fabbricante 
detta ROM (read only memory: memo- 
ria di sola lettura). Questa sigla, in termi- 
ni discorsivi, può esser tradotta come: 
una memoria dove non è possibile “po- 
tare'*, Il software di base, scritto perma- 
nentemente su circuito integrato, prende 
anche il nome di firmware, 

I personal computer, a differenza degli 
home, possiedono prestazioni più eleva- 
te (quali maggiori velocità di lettura/ 
scrittura dalle memorie di massa). In 
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questo caso il sistema operativo non ri- 
siede permanentemente su ROM, rmi 
deve essere caricato al momento de I Tac- 
ce nsionc. In queste macchine gli unici 
programmi su firmware sono due ed cn 
trambi piuttosto brevi; uno di diagnosti- 
ca e uno caricatore, detto anche di buoi 
strap. El primo controlla l'efficienza delle 
pani fisiche della macchina prima di dare 
il nm al secondo che provvede a! carica- 
mento del sistema operativo. 

Una giungla di nomi 

A questo punto entrano in gioco le 
sigle di cui abbiamo parlato in apertura 
di questo articolo. Quei nomi corrispon- 
dono ai sistemi operativi più famosi e ira 
questi spiccano maggiormente l'MS / 
DOS (MicroSoft Disk Operative Sy- 
stem) della notissima Microsoft e CP/M- 
SO (Control Ptoccss far Microproces- 
sori) dell'altrettanto nota Digital. Il pri- 
mo è legato al Pc/Ibm (viene infatti chia- 
mato più comunemente Pc/dos) c il se- 
condo è più vicino a noi perchè utilizza- 
bile con il nuovo nato Commodore 128. 

Fare un confronto vero e proprio tra i 
due. però, non sarebbe ragionevole poi- 
ché sovrani tendono al funzionamento di 
microprocessori completamente diversi 
tra loro. Infatti il CP/M-80 è stato fatto 
su misura per i microprocessori (vecchi 
ma ancora validi e potenti) Intel 8080 e 
Z/80. fi sistema MS/DOS sfrutta invece 
le migliori prestazioni degli Intel 8086- 
8088 di più recente realizzazione. 

Ci limiteremo quindi a illustrare qual- 
che caratteristica dei due sistemi facendo 
particolarmente riferimento al CP/M-80 
che interessa più da vicino i nostri lettori. 

Il linguaggio di sistema 

Una volta "bootst tappato* (caricato 
al momento dell’accensione) il sistema 
operativa, ci troviamo in quello che c<i- 
munemente si definisce ''ambiente*' di 
sistema. A differenza dei sistemi operati- 
vi in ROM, come quello del C-64, che 
sfruttano il Basic come linguaggio di co- 
municazione con Putente, qui abbiamo a 
che fare con una sorta di linguaggio del 
sistema 


Più che di "linguaggi!)" dovremmo pe- 
rò parlare semplicemente di un gruppo di 
comandi. Questi sono soprattutto quelli 
di gestione delle periferiche e in parfico- 
lar modo dei disk-dnve Ci riferiamo 
quindi alla lettura della directory (elenco 
dei file contenuti in un disco), alla for- 
mattazione dei dischi, alla stampa di file/ 
dati, alla copia di dischetti eccetera. 
Quando il lettore lavorerà su sistemi più 
"grossi*', si renderà conto di persona che 
la parte relativa al colloquio con le me- 
morie di mussa (dischi rigidi, floppy) è la 
più importante c delicata nel normale 
lavoro professionale. 

Comandi residenti e tra ostenti 

In ambiente MS/DOS tali comandi de- 
vono essere sempre caricati in memoria 
prima di essere eseguiti, quindi il disco di 
sistema deve essere sempre in linea, cioè 
nei drive , Naturalmente i tempi di carica- 
mento sono ultra ve loci, neanche parago- 
nabili a quelli del C-64. E* ebbro che 
usare tale sistema operativo in presenza 
di un unico drive è problematico e infatti 
macchine come il Commodore Pc-tt) so- 
no dotate quasi sempre di due drive. 

Per ovviare a questo problema il CP/M- 
811, che funziona spesso su sistemi a un 
solo drive (come il C-128), possiede alcu- 
ni comandi, quali "DIR” per la lettura 
della directory o "ERA*' per La cancella- 
zione dei file e altri ancora, sempre resi- 
denti in ROM. 

Se qualche utente di C-128 possiede 
due drive, tanto meglio per lui. Quelli, e 
sono tanti, che ne hanno uno solo, posso- 
no tirare un lungo respiro e dormire son- 
ni tranquilli, 

I comandi del CP/M che non risiedono 
in memoria vengono comunemente detti 
transenti proprio perchè, una volta uti- 
lizzati, non servono più e possono esser 
cancellati in modo da non occupare più 
spazi di memoria Devono, ovviamente, 
essere caricati di volta in volta per essere 
eseguiti. Vanto per citarne uno tra i più 
importanti, possiamo prendere in colisi- 
de razione PIP (Peripheral Intcrchange 
Program) che provvede alla copiatura di 
dischetti, al trasferimento dati da di- 
schetto a stampante, eccetera. 


1 software di utilità 

Ogni sistema operativo che si rispetti 
possiede a corredo vari programmi ds uti- 
lità, che risiedono generalmente accanto 
ai comandi nel disto di sistema. Sia MS/ 
DOS che CP/M-80 sono dotati di un as- 
semblatore che permette di scrivere pro- 
grammi nel linguaggio assembler relativo 
al microprocessore. Un editore di testi 
permette di leggere e manipolare t file/ 
programma oppure i file dati. Sia chiaro 
che gli editori di testi in questione trova- 
no grande utilità nel lavoro sui file, ma 
non sono affatto paragonabili a pro- 
grammi specifici di word processing. 

Come scrivere un programma 
con i comandi di sistema 

pesso si rendono necessarie procedure 
ripetitive nell’amhiente di sistema esia in 
C P/M che in MS/DOS è possibile creare 
file programma che svolgono procedure 
di sistema automatica mente, senza la ne- 
cessaria riscnttura dei comandi, l’ale 
prerogativa è ottenibile con due metodo- 
logie differenti: 

• il primo consiste nella possibilità di 
creare, utilizzando appropriate procedu- 
re, un file di istruzioni detto "file batch"; 

• la seconda possibilità consiste invece 
ne liuti lizzo di apposite chiamate 
(CALE) dal Basic 

Questa seconda ipotesi potrebbe esse- 
re paragonata all 1 utilizzo delle SYS nel 
C -64, ma solo da un punto di vista teori- 
co: nella pratica queste CAI E sono 
estremamente semplici da usare anche 
da coloro che non conoscono a fondu il 
SO e non hanno nessuna nozione di codi- 
ce macchina. 

In definitiva l'approccio a un sistema 
operativo come CP/M ci introduce in 
quello che possiamo definire l'ambiente 
professionale deU’claborazione dati, 
aprendoci infinite possibilità di speri 
mentazione e, perchè no?, di grande 
divertimento. 

Molti sono, infatti, i programmi validi 
sinora realizzati sul sistema C P/M, 

Ora che anche la Commodore è entra- 
ta in questo sistema ne vedremo delle 
belle,., 
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Pascal 

di M I Nini * lì.K. Matturro 


II Pascal, sviluppato 
da Niklaus Wirth 
intorno al 1 966, è il 
primo linguaggio 
coerente con i 
principi della 
programmazione 
strutturata . 





U n programma in Pascal si presenta 
come un corpo iniziale di dichiarazioni, 
seguito da una serie di procedure che 
eseguono tutti i lavori di routine. 

Il lavoro di stesura del programma de- 
ve essere organizzato a tavolino* almeno 
nella sua struttura globale. Risulta diffi- 
cile scrivere un buon programma “im- 
provvisato" in Pascal, così come si è abi- 
tuati in ambiente Basic, 

Esistono infatti regole molto rigide di 
sintassi che obbligano* in un certo senso, 
a ottimizzare un programma. Tutte le 
variabili utilizzate, per esempio, devono 
essere dichiarate in testa ai programma e 
nelle singole procedure- Ciò costrìnge a 
tenerle a mente e T di conseguenza, obbli- 
ga il programmatore non solo a una 
economia' nell’uso, ma anche a essere 
ordinati e precisi (il che non guasta}. 

Non esiste numerazione di linee, come 
nd Basic, anche se è prevista la possibili 
t à di dichiarare “labels" per punti strate- 
gici del programma Con le possibilità 
offerte, comunque, si riesce a scrìvere 
una procedura che effettui parecchie 
scelte logiche in modo compatto, senza 


"salti’ 1 di alcun tipo. Nei casi piu difficili 
è comunque previsto fuso del famigera- 
to 'goto 1 ', elemento di disturbo ai fini 
della logica comprensione di un qualsiasi 
listato. 

Ricorriamo a un paragone, valido so- 
prattutto per i nostri lettori già esperti dì 
Basic. 

Pascal; 


procedure conto 
begin 
volte: =0; 
while (a>b> 
begin 
a:=a-b; 

volte := volte +1; 
end; 

end; 


Basic: 

m ) REM SOTTO P ROG RAMMÀ 
1000 1=0 
10101 = 1+1 
102(1 A = A-B 
1030 IF A>B THEN 1010 


Si vuole contare quante volte R è con- 
tenuto in A. L'esempio è estremamente 
semplice* ma già chiarisce alcune diffe- 
renze, La struttura “while" permette di 
identificare molto chiaramente quale è la 
serie di istruzioni che viene ripetuta, e 
quale è la condizione che deve verificarsi 
perchè il procedimento continui. Ai con- 
trario, in Basic, bisogna osservare molto 
bene un listato (ovviamente, piu com- 
plesso del nostro esempio!} per capire 
cosa si sta facendo e quale è il punto di 
rientro. 

Le variabili Basic vengono sempre 
modificate dal programma (nell'esempio 
varia l’indice “ì"} cioè sono tutte “globa- 
li". In Pascal* invece, le variabili possono 
essere globali o anche “locali" all'interno 
della procedura nella quale sono dichia- 
rate. Menzioniamo ancora una differen- 
za: in Pascal esiste un solo punto di chia- 
mata per ogni procedura, mentre in Ba- 
sic si possono creare situazioni ambigue 
del tipo: 
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900GGSUB 1000 


990 REM SOTTOPROGRAMMA 
1000 1=0 


1040 RETURN 

in cui il sottoprogramma 1000 è richia- 
mato la prima volta con l'istruzione GO- 
SUB di riga 900, mentre la seconda vol- 
ta, col '‘proseguire"’ del programma, vie- 
ne eseguilo in modo sequenziale, a meno 
che non si inserisca, ad esempio, 999 
END. 

L’importanza del Pascal non sta co- 
munque solo in questi miglioramenti di 
possibilità già esistenti, ma, piuttosto, 
negli strumenti nuovi che mette a dispo- 
sizione, tra cui vogliamo ricordare in mo- 
do particolare: type, record, pointer. 

Oltre ai tipi standard di variabili inte- 
re, reali, logiche, caratteri, esiste la pos- 
sibilità di creare tipi piu astratti, a cui 
sono applicabili gli opera tori di 
relazione: 

type giorno (lun,mar,mer, 
gio„ven,sab); 

var oggi: giorno: 

La variabile “oggi 1 ' è di tipo "giorno” 
e può essere confrontata con altre dello 
stesso tipo; valgono cioè relazioni quali: 

lun < mar 
mar < ven 

Possono inoltre essere definiti “set” 
come collezioni di oggetti dello stesso 
tipo: 

type periodo = set of giorno; 

con cui si possono effettuare operazioni 
di unione, intersezione, differenza di 
insiemi. 

Un "record" è una variabile struttura- 
ta con parecchie componenti, che posso- 
no essere di tipo diverso: 


type data — record 

giorno: 1.31; 
mese; 1..12; 
anno: 1000 ,2000; 

type persona = record 

nome: string; 
cognome: string; 
nascita: data; 
sesso: (maschile, 
femminile); 

stato:(non sposato, 
spos, , vedovo, divorz,); 
vaT studente: persona: 

Gli esempi si potrebbero moltiplicare 
e complicare, ma non è questa la sede 
adatta. Si noti solamente che fuso dei 
record permette una manipolazione dei 
dati quasi impossibile con altri linguaggi. 

L'ulteriore innovazione del Pascal, 
ora presente anche in altri linguaggi tipo 
"C’\ è il "pointer" (puntatore), che per- 
mette 3 allocazione dinamica dei dati nel- 
la fase di esecuzione. Normalmente le 
dichiarazioni dell'ampiezza di un vettore 
o di una matrice, vengono fatte all’inizio 
di un programma e devono essere 
rispettate. 

Se in Basic viene definito un vettore 
con l’istruzione DIM N(100), nel mo- 
mento in cui, m fase di esecuzione si 
temerà di usare l’elemento N{101), si 
avrà una segnalazione di errore. Il pro- 
blema opposto è che se del vettore ven- 
gono usati solo i primi dieci elementi, ci 
sarà una quantità di spazio sprecato. 

Ciò che permette il Pascal con l'uso dei 
puntatori è La creazione dello spazio ne- 
cessario per i dati solo al momento in cui 
serve e la restituzione delio stesso quan- 
do non serve piu. 



Con la dichiarazione 

type link = persona; 
var p: link; 

si dice che il tipo "link” è un puntatore 
all oggetto "persona” e che la variabile 
"p" è di tipo link. Una variabile di tipo 
"persona" potrà essere memorizzata 
creando un puntatore con l'istruzione 
new{p), mentre sarà cancellata resti- 
tuendo il suo puntatore con dispose(p). 
In pratica, il puntatore contiene l’indiriz- 
zo della variabile a cui punta. 

Si potrebbe paragonare fusti dei pun- 
tatori alla gestione di un vettore fatta 
direttamente da programma con l'uso 
delle istruzioni PGK.E, PEEK, per cui 
non si avrebbe alcun dimensionamento 
ma solo un contatore del numero di dati 
inseriti a partire da un certo indirizzo. 

L'argomento è molto complesso e non 
si può esaurire in questa sede. Appare 
comunque evidente come la possibilità di 
creare dinamicamente arrays e record 
apra la strada a e la bo razioni molto com- 
plesse, realizzabili in modo economico. 
Si pensi semplicemente alla gestione di 
tutti i dati relativi aM'archivio di una 
biblioteca. 

Anche il Pascal ha comunque qualche 
pecca, ma, del resto, nessun linguaggio 
può offrire il massimo sotto ogni aspetto. 

La trattazione di input e output non è 
particolarmente facile nè comoda, sia 
per quanto riguarda gli I/O standard, sia 
per ciò che concerne la manipolazione di 
file. Salvo provvedimenti particolari pre- 
si nelle diverse implementazioni, è quasi 
i hi possibile all’utente creare una sua bi- 
blioteca di programmi. 

Ricordiamo inoltre che il Pascal non è 
interpretato, ma compilato, ed è quindi 
uno strumento piuttosto complesso per 
chi si avvicina per la prima volta a un 
linguaggio di programmazione. 

La chiarezza della strutturazione e la 
comodità degli strumenti offerti passano 
pelò in primo piano rispetto allo svantag- 
gio accennato, superato solo, per il mo- 
mento, dal Pascal interattivo realizzato 
per Macintosh. 
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Fortran 

di MLL* [Vitti - !>,R, Matturro 


Il linguaggio Fortran (Formula Translation) è 
uno dei più “ vecchi ” linguaggi ad alto livello, 
nato assieme al Basic e al Cobol intorno agli 

anni cinquanta. 


M e atre il Basic era esplicitamente 
orientato ai principianti e il Cobol alle 
elaborazioni commerciali, si voleva fare 
del Fortran una strumento per le elabo- 
ra/ioni di tipo scientifico. 

L’idea base era che un programmatore 
avrebbe dovuto scrivere i programmi che 
gli interessavano in un linguaggio il più 
possibile familiare. 

Questo strumento avrebbe dovuto 
permettere una facile “traduzione" di 
form ule mate matico-scie n ti fiche , per 
farle poi elaborare a! calcolatore. 

Ancora oggi il Fortran rimane il lin- 
guaggio più largamente usato per lavori 
scientifici e tecnici, 

Per un certo periodo ha subito nume- 
rose “trasformazioni" per cui si resero 
disponibili “dialetti" praticamente in- 
compatibili tra loro: un programma scrit- 
to per una macchina non poteva “girare" 
su un’altra senza fare molteplici 
modifiche, 

À partire dai I%6 l'Àmerican Natio- 
nal Standard* Institute ( Ansi) ha definito 
una forma standard di Fortran, chiamata 
appunto Ansi Fortran, con lo scopo di 
renderlo “portabile", ovvero di fare in 
modo che un qualsiasi programma potes- 
se girare su macchine, anche diverse, pur 
se con lievissimi ritocchi. 

Resta comunque un problema la mol- 
teplicità delle versioni, anche se stan- 
dard. esistenti: FortratlIV, Fortran66 t 
FortranT?, Fortran77+, per non citare il 
vecchissimo Fortran! I, per cui un even- 
tuale utente pud restare totalmente diso- 
rientato Del resto questo è un problema 


comune ai linguaggi più vecchi. Chiara- 
mente non potrà sorgere per linguaggi 
relativamente giovani, come il “C" e il 
Pascal. 

Parliamo ora delle caratteristiche del 
Fortran, riferendoci alla sua versione più 
“bella", il Foftran77-k 


In dettaglio 

Come si presenta un programma scrit- 
to in Fortran? 

Esiste un blocco iniziale di dichiarazio- 
ni, contenente variabili, dimensiona- 
menti vari, eventuali variabili globali, 
eventuale inclusione di file. Segue un 
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programma principale e una lista di 
submarine. 

Le variabili intere e reali non vanno 
necessariamente dichiarate, mentre 
quelle logiche e le variabili stringa (cha- 
ra etere) devono essere contenute iti ap- 
posite dichiarazioni. Uno degli svantaggi 
di questo linguaggio è che le variabili, 
per essere globali (valide per l’intero pro- 
gramma). vanno dichiarate in ogni singo- 
la routine, oltre che nel “mairi program' 1 
(programma principale). Un vantaggio è 
invece rappresentato dal fatto che in rou- 
tine diverse possono tranquillamente 
trovarsi variabili con nomi identici, senza 
creare problemi, 

La versione citata del Fortran contiene 
tutte le frasi di controllo che appartengo- 
no ai linguaggi piu 1 evoluti, tra cui i salti 
condizionati (if then else), cicli con con- 
dizioni imposte a 11' inizio della dichiara- 
zione (do while, do unti!), scelte tra vari 
casi possibili (select case). Permette, 
quindi, di realizzare una programmazio- 
ne strutturata di buon livello, rendendo 
mutili, di fatto, etichette e "goto". Le 
etichette sono comunque permesse nel 
programma. 

Chiariamo per esempio, per i nostri 
lettori più esperti di Basic, il significato 
del "do while'L Mettiamo a fronte questi 
due spezzoni di programma: 


Basic 


9901^1 + 1 

1000GET AJ;IF A$=“"THEN 1000 
1010 IF A$= L *S” THEN 990 
1020 PRINT ‘FINE* 

1030 END 

Fort ran 


a — V 

do vvhilc (a.eq. V) 
i=i + l 
read*,a 
end do 

prin tVfine' 

end 


In Basic esiste la possibilità di creare 
un ciclo solamente su valori numerici; 
per realizzare quindi un ciclo basato su 
una condizione vera o falsa, bisogna ri- 
correre a un "ir unito al salto, 

In Fortran il ciclo “do", unito con 
ll whìle T \ prosegue finché è vera la condi- 
zione riportata in testa. 

Vediamo ora come si presenta un pic- 
colo programma completo, che calcola la 
somma di cento elementi Setti uno per 
volta e capace di individuare il valore 
minimo, il massimo e il range degli 
elementi: 


Purtroppo non esiste la possibilità di 
allocazione dinamica della memoria: le 
dimensioni vanno fissate all inizio tn mo- 
do rigido. Inoltre questo linguaggio non 
permette in alcun modo di programmare 
a un livello più basso: non esiste possibi- 
lità alcuna di leggere o modificare, da 
programma, il contenuto di indirizzi di 
memoria specifici. 

Il Fortran si presta moliti bene per usti 
didattico. E T certo meno facile da digeri- 
re di quanto non lo sia il Basic, ma al suo 
confronto permette un tipo di program- 
mazione molto più raffinata. Una delle 


C TROVA LA SOMMA, MINIMO, MASSIMO, RANCE 
REAI, MAX, MIN 
READ 
SOMMA - X 
MAX = X 
MIN = X 
DO 1=2,100 
READ *, X 

1F (X.GT. MAX) THEN 
MAX = X 

ELSEIF (X.LT.SMALL) THEN 
MIN = X 
ENDIF 

SOMMA = SOMMA + X 
END DO 

RANCE = MAX -MIN 

PRINT *, ‘SOMMA = /SOMMA /MASSIMO =*\MAX, 

l 'MINIMO - /MIN/RANGE FRANGE 

END 


Anche la possibilità di manipolazione 
dei caratteri è molto buona; esìstono 
funzioni per contare la lunghezza delle 
stringhe, per accostarle, per isolare i sin- 
goli caratteri. 

Purtroppo sono ancora in circo lazione 
versioni meno dotate, come il Fortra- 
nJV, che non possiedono l'istruzione "if 
then else" e neppure le funzioni di mani- 
polazione delle stringhe. 

La gestione dei file risulta semplice, 
forse tra le più semplici per ciò che con- 
cerne i linguaggi ad alto livello. La flessi- 
bilità delle istruzioni di entrata-uscita 
permette la creazione di validi program- 
mi interattivi e una razionale realizzazio- 
ne della stampa dei risultati. 


maggiori difficoltà per i principianti è si- 
curamente costituita dal problema della 
compilazione, che aumenta ovviamente i 
tempi tra la scrittura dei programma e 
l'osservazione dei risultati cui porta. 
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Il linguaggio “C” 


nosciuta frase n=n + 1, Lo stesso vale per 

■ 

La partìcolaritàè che: 


“C” è un linguaggio di programmazione 
estremamente completo, adatto a quasi tutti 
gli scopi. F stato sviluppato sui sistema 
operativo Unix e sia Unix che Usuo software 


sono scritti in *‘C”. 


di MX. Nitri IXR + Matturro 


^ può essere classificato co- 
me un linguaggio a basso livello; questo 
fatto non conferisce un aspetto negativo, 
ma significa che esso permette di intera- 
gire con la macchina come un linguaggio 
Assembler. Può maneggiare indirizzi e 
gestirli con gli operatori logici e aritmeti- 
ci normalmente implementati sui 
microprocessori. 

Un programma in “C" si presenta co- 
me una serie successiva di moduli, il pri- 
mo dei quali si chiama sempre “main()" 
e gli altri hanno nomi scelti dall’utente. 

Prima di ciascuna routine possono esser- 
ci una serie di definizioni dì costanti e 

# include <stdio.h> 

# define IVI AXLINE Itti) 
mairi () 

f 

charline{MAXLINE}' 
whi le { ge t line ( li ntf , M AXLINE ) > 0) 
pnntf(“%s’\ line); 

» , 

getline($, lim) 
diar s{ }* 
int lim; 

{ 

int c,i; 
i = Q; 

while (--lim > 0 && (c—getchar ()) !=EOF && c ! 
S(i + +] = c; 


una serie di dichiarazioni di moduli da 
‘ attaccare" al programma. Vediamo un 
esempio di programma completo. 

La simbologia, come si può notare, è 
in comprensibile per i non iniziati. TI pro- 
gramma visto calcola la lunghezza di una 
stringa (che al massimo contiene IOTI) 
caratteri) e la stampa. In questa sede non 
avrebbe senso spiegare ogni punto del 
programma, ma T a titolo di curiosità, c 
soprattutto per dimostrare quanto è pre- 
ciso il “C\ citiamo solamente gli opera- 
tori di incremento e decremento, Essi 
sono rappresentati da.: +4- e —, Scrìvere 
4-+n oppure n++ equivale alla ben co- 


» 


if ( c — \ n) 
s{i ++} = 

m - V; 

Tetum(i); 


c; 



+ +n incrementa n prima di usarlo; 
n + + incrementa n dopo averlo usato. 

“C*' è relativamente “piccolo” e pu$ 
essere descritto in un tempo relativa- 
mente breve. I compilatori iK C” sono 
semplici e compatti e tra di loro molto 
più compatibili delle cosidette versioni 
standard del Fortran, 

Il solo tipo di dato è, fondamental- 
mente. la parola di macchina: si accede 
ad altre specie di “oggetti" mediante 
operatori oppure funzioni. I tipi di dati 
definibili sono i caratteri, gii interi di di- 
verse ampiezze, ì numeri reali. In ag- 
giunta, c’è una gerarchia di dati derivati 
creati con puntatori: arrays, strutture, 
unioni, funzioni. 

“C" fornisce le fondamentali istruzio- 
ni di controllo per la costruzione di pro- 
grammi ben strutturati: 

• per prendere decisioni (if); 

• loop con test all 9 inizio (ft>r T while); 

• loop con test alla fine (do); 

• scelta fra più casi possibili (switch). 


Non fornisce invece alcuno strumento 
per Input/output. Non esistono frasi tipo 
READ, WRITE e metodi di accesso ai 
file. Tutte queste operazioni devono es- 
sere svolte da funzioni. Analogamente 
tutte le funzioni suIFanaiisi delle stringhe 
di caratteri devono essere create pazien- 
temente dall’utente. 

Il linguaggio <4 C” viene usato per gli 
scopi più svariati: creazione di sistemi 

ri 

operativi, calcolo numerico, creazione di 
word-processor e di data-base. 

“C' è sicuramente un linguaggio che 
offre molto a chi molto gli si dedica : biso- 
gna lavorare parecchio per sfruttarlo be- 
ne. E’ eccezionale per lavori ad alto livel- 
lo* consigliabile a persone con una prece- 
dente esperienza di linguaggi. 

E’ invece assolutamente sconsigliabile 
come primo linguaggio di programma- 
zione oppure per i principianti. 
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Lisp 

& 

Logo 


F' orse non tuttìsanno che.,., il “lin- 
guaggio della tartaruga'" è uno dei piu 
potenti c moderni tra quelli creati e usati 
negli ambienti dell' AI (Àrtificiai 
Intelligence), 

Per fare un po" di storia e giustificare 
quanto appena affermato, Logo nasce a 
Cambridge nel Massachussets ad opera 
di alcuni ricercatori della società Boll 
Re rane k e Newinan e si sviluppa, presso 
l'università di quello stato, nei laboratori 


Da Lisp a Logo: 
ovvero I* intelligenza 
artificiale a cavallo 
di una tartaruga. 

di MX. Nitri - IJ.K. Matturro 


Technology), 

In questo laboratorio si sono formati 
moltissimi degli scienziati che si occupa- 
no di AL ovvero una branca sperimenta- 
le de 11 1 informatica dove si sa possibilità 
di riprodurre, servendosi dì un compu- 
ter, i processi cerebrali. 

Proprio quel Logo che molti sono por- 
tati a sottovalutare, perchè visto solo sot- 


to l'aspetto grafico della tartaruga, è sta- 
to usato per sperimentare progetti di si- 
mulazione del pensiero umano. Chiara- 
mente non ci riferiamo a programmi do- 
tati di "personalità"' o capaci di compor- 
tamenti completamente autonomi e altre 
diavolerie che si vedono nei film di fanta- 
scienza, ma a ricerche più terrene: dai 
programmi che giocano a scacchi a quelli 
in grado di formulare piccole teorie ma- 
tematiche e altri temi del genere. 

Ci troviamo quindi di fronte a un lin- 
guaggio completo capace di assolvere ali- 
le stesse funzioni del Basic, ma maggior- 
mente dotato, rispetto a quest ultimo, 
sia nella grafica, sia nella gestione dei 
dati, sia nelle istruzioni di controllo. 

Logo e Lisp 

Un linguaggio più potente e piu facile 
del Basic. Allora perchè non dotarne tut- 
ti gli M home”? Sarebbe slato infatti mol- 
to meglio, ma purtroppo quando le scel- 
te vanno fatte in funzione della memoria 
occupata, non è certo Logo a essere la 
soluzione migliore. 

Quest" ultimo, infatti, occupa da solo 
circa 30 Kbyte di memoria e necessita 
ovviamente di ulteriore spazio per fun- 
zionare correttamente, contro gJi 8K, 
tanto per citare un personal, dell'inter- 
prete Basic del Commodore, 

l più curiosi saranno lieti di sapere che 
il C-64 può avvalersi dì un interprete Lo- 
go caricabile da disco, Questo interprete 
è la traduzione in italiano del Logo origi- 
nale, quello nato al Mit di chiara deriva- 
zione del Lisp 

E' proprio il Lisp la matrice del Logo c 
infatti le caratteristiche che fanno di que- 
st'ultimo un linguaggio spiccatamente 
evoluto sono le stesse che fanno del Lisp 
il linguaggio della quarta generazione. 

Liste di dati 

Logo gestisce i dati sotto forma di liste, 
proprio come il Lisp. Questo non signifi- 
ca che non esistono le variabili, ma sem- 
plicemente che gli ""insiemi” organizzali 



del Mit (Massachussets Inshtutc of 
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di variabili (quali vettori e matrici) si ri- 
presentano qui in una nuova formula 
meglio utilizzabile per costruire basi di 
dati, ovvero strutture di informazioni. 

I dati strutturati in liste e trattati come 
tali tono meglio reperibili in quanto è più 
tacile estrarne solo la parte che ci serve, 
con estrema velocità. 

Vediamo che cosa significa. 

Una base di dati potrebbe essere uno 
schedano contenente informazioni di va- 
rio tipo su tutti gli allievi di una scuola. 

Ciò corrisponde anche a quello che 
comunemente chiamiamo archivio, ov- 
vero un insieme di file-dati relativi a uno 
o più argomenti organizzati tra loro. Se 
tale archivio fosse ben organizzato, noi 
potremmo reperire facilmente le infor- 
mazioni che ci interessano utilizzando un 
linguaggio di interrogazione, ovvero una 
serie di comandi che permettano facecs- 
so a un gruppo di dati secondo determi- 
nate condizioni. 

Ad esempio, volendo conoscere il no- 
me degi allievi maggiorenni, che fre- 
quentano il secondo anno, in possesso di 
un computer, se la base di dati fosse ben 
architettata e contenesse queste infor- 
inazioni, gli allievi del secondo anno ra- 
pre sentirebbero il gruppo di dati cui si 
intende giungere e la maggiore età {unita 
al possesso di computer) la condizione. 

Ricorsiti ne, questa sconosciuta 

Viste cosi le cose, sembrerebbe di aver 
fatto la scoperta dell'acqua calda: qual- 
siasi Data Base che si rispetti espleta 
queste funzioni. Solo che un Data Base si 
ferma a questo punto mentre, al contra- 
riti, per LiSp e Logo questa rappresenta 
la “base" da cui partire. 

1 due linguaggi possiedono (il Lisp m 
forma più potenziata) una serie di istru- 
zioni di controllo che permettono di ma- 
nipolare le liste secondo tecniche 
avanzatissime 

Senza voler insegnare in questa sede 
l’uso dì queste “alchimie \ ne facciamo 
un breve cenno In primo luogo ogni pro- 
cedura può neh i mare se stessa, come 
se, all interno di una submarine de! Ba- 


sic, inserissimo un GOSUB alla stessa 
linea di programma. Il Basic, in falcavo, 
ci darebbe un errore di GUT OF ME- 
MORY, perchè tale possibilità non è 
prevista, 

Logo esegue tranquillamente il co- 
mando entrando in un sottolivello e, in 
caso di ulteriore chiamata, in un sotto- 
sotto livello e cosi via scendendo e risa- 
lendo a piacere. 

Questo gioco di scatole cinesi si chia- 
ma ritorsione ed è molto difficile da “di- 
gerire” teoricamente, anche perchè si sa 
dove inizia ma non dove finisce. Con 
l’uso, però, ì concetti esposti risultano 
estremamente chiari. 

1/ altra prerogativa è rappresentata 
dalle variabili locali. Ad esempio la va- 
riabile “A 1 ' dì una procedura mantiene il 
valore assunto a ogni livello e, di conse- 
guenza, se al livello 2 tale variabile vale- 
va 4, quando rientriamo in quel livello la 
ritroveremo ancora con questo valore., 

Per chiarirci le idee, è un po’ come se 
avessimo un vettore A(n) dichiarato, pe- 
rò senza indice e quindi senza tutte le 
complicazioni di incremento e decre- 
mento che gli indici comportano. 

Ma chiudiamo la “scatola" delle scato- 
le cinesi e prepariamoci a una nuova 
sopre sa, 

i ■ 

Un linguaggio pc risonai ìzzatu 

La cosa più simpatica di Logo è 
l’ autoapprendimento. 

Non fraintendiamo: non è che Logo 
impara da solo nuove cose, ma, sempli- 
cemente, è possibile aggiungere nuovi 
comandi a quelli già esistenti. Si può rea- 
lizzare, in tal modo, una vera e propria 
biblioteca personale utilizzabile nello 
stesso modo in cui si usano le istruzioni. 

Schiariamoci le idee con qualche 
esempio: 

• PS è un 1 istruzione che esegue la puli- 
zia dello schermo; 

• STAMPA corrisponde al print del 
Basic con diversi parametri; 

• SGMM A-Dl esegue la somma dei va- 
lori o variabili che seguono. 


I comandi seguenti ottengono l'effetto 
di pulire lo schermo, stampare la frase 
“ecco la somma richiesta 1 ’, eseguire la 
somma delle variabili “A" e “B” e stam- 
parne il risultato: 

PS 

STAMPA [ECCO LA SOMMA DI 
A+B] 

STAMPA SOMMA-DI A B 

Tale gruppo di istruzioni poteva di- 
ventare una procedura se avessimo scrii 
to i comandi stessi dopo aver richiesto 
all'interprete di considerarli come tale. 
Ovvero sarebbe stato sufficiente scrivere 
“PER” seguito dal nome da assegnare 
alla procedura* per esempio 
“ STAMPA SOMMA ” : 

PER STAMPASOMMA 
PS 

STAMPA [ECCO LA SOMMA DI 
A+B] 

STAMPA SOMMA-DI A B 
FINE 

Dopo tale operazione* semplicemente 
digitando: 

STAMPASOMMA 

avremo ottenuto lo stesso effetto della 
sequenza di istruzioni da cui eravamo 
partiti. 

Una volta definita come procedura, 
STAMPA SOMMA diventa un'ulteriore 
parola del vocabolario di Logo utilizzabi- 
le come istruzione in qualsiasi altra pro- 
cedura che potrebbe diventare istruzione 
a sua volta. 

Qui si rischia di tornare alle scatole 
cinesi e qualcuno potrebbe pensare che il 
Logo sìa stato inventato appunto dai ci- 
nesi per fare impazzire gli occidentali. 
Invece Logo è una “macchina" di facilis- 
simo uso e di grande flessibilità, tanto 
che ogni utente ha la possibilità di perso- 
nalizzare il sistema facendogli appunto 
“apprendere” nuovi comandi congeniali 
al proprio lavoro di programmazione. 
Alla fine di una sessione di lavoro, con 
un semplice comando* possiamo salvare 
la nostra biblioteca di comandi e ricari- 
carla in seguito arricchendola, magari, 
finché memoria permette. 
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Venti domande 
sul linguaggio macchina 


Rispondiamo in 
queste pagine alle 
numerose 
domande, tutte sul 
linguaggio 
macchina (LM), 
giunte in redazione. 
Un modo semplice 
ed efficace per 
accostarsi senza 
tanti problemi a 
quest argomento. 


di Alessandro de Simone 



□ Il LM è un vero e p roprio I ‘ uajqpo? 
Esiste un LM standard cosi come esiste 
un Basic standard? 

«i 

» All'intemo di un qualsiasi computer è 
presente un circuito elettronico, il micro 
processore (detto spesso semplicemente 
"mitro") che, per funzionare, richiede 
una successione di codici rappresentanti 
il linguaggio del micro stesso. Questi co- 
dici, (che sono semplici numeri interi il 
cui valore è compreso tra 0 e 255) sono 
molto difficili da comprendere, soprat- 
tutto da chi conosce appena il Basic. 
Inoltre, se non bastasse, non è sufficiente 
conoscere il linguaggio di un certo micro- 


processore per utilizzare programmi in 
LM di tipo “universale”. 

Per esempio, se, con qualsiasi compu- 
ter che parli il Basic, digitate un coman- 
do banale come: 

PRIN'F'PIPPQ” 

la conseguenza sarà la visualizzazione 
della parola “PIPPO" sul video del com- 
puter. Ciò, ripetiamo, sia che il compu- 
ter sia un Vic-20, un C-64 oppure un Ibm 
eccetera. Il motivo delPidentìco compor- 
ta mento è dovuto al fatto che il Basic è, 
almeno in generale, un linguaggio uni- 
versale, cioè standard. E" ovvio, quindi. 


che il computer viene, dai fabbricami, 
"adattato' - al linguaggio standard, dato 
che non deve avere alcuna importanza il 
nome della marca dei calcolatore, ma 
solo il linguaggio adoperato. 

Nel caso del linguaggio del micropro- 
cessore (LM, appunto) le cose stanno 
ben diversamente. Infatti, il linguaggio 
dei micro installati nei Vic-20, nel C-64, 
nel C-16, nel Plus/4 e nei grossi PET, è 
sempre lo stesso, dato che sempre la stes- 
sa è la "famiglia" cui appartengono i mi- 
cro impiegati: la65XX, Ciò significa che, 
a parte alcuni casi particolari, il micro di 
base è sempre il 6502 (grossi PET, Vic- 
20), che diventa 6510 nel C-64 e 7510 nel 
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C-16 e Plus/4, In altre parole, il codice 
16^ de IT istruzione "LDA" (su cui tome- 
remo tra breve) significa la stessa cosa su 
ognuno dei computer menzionati. Se 
proviamo, però, a utilizzare un program- 
ma scritto in LM espressamente per il 
Vic-20 e cerchiamo di farlo girare su 
macchine diverse (es, C-64), abbiamo la 
sgradita sorpresa di non vederlo funzio- 
nare, nonostante il linguaggio sìa esatta- 
mente lo stesso. Il più delle volte, anzi, 
sarà necessario spegnere il computer e 
riaccenderlo a causa del pasticcio 
combinato. 

Vediamo di spiegarci un'apparente 
contraddizione: 

* programmi scritti in Linguaggi evoluti 
(come il Basic) sono eseguibili su qual- 
siasi computer (pur se dotati di micro 
completamente diverbi tra loro); 

* programmi in LM (linguaggio real- 
mente standard perchè è il linguaggio 
specifico di un micro ben definito) fun- 
zionano solo su un particolare modello di 
calcolatore e su nessun altro, anche se 
dotato dello stesso identico 
microprocessore 

Per venirne a capo, riferiamoci a un 
esempio banale. Sapete benissimo che, 
in una qualsiasi automobile, vi sono tre 
pedali, posizionati da sinistra a destra: 
frizione, freno, acceleratore. 

Quando l’automobilista preme il fre- 
no, ottiene lo stesso identico effetto (de- 
celerazione e arresto delia vettura) qua- 
lunque sìa l'automobile manovrata. 

Ciò significa che se i freni sono a disco, 
a tamburo, idraulici o meccanici, serviti 
oppure no, l'effetto è sempre lo stesso. 

Profonde differenze esistono, però, se 
consideriamo "intimamente” la reale 
struttura deirimpianto frenante dei nu- 
merosi modelli in circolazione. 

La disposizione dei pedali può esser 
paragonata ai comandi Basic che, indi- 
pendentemente dal micro installato, pro- 
ducono io stesso effetto finale 

f tubi deirolio, le dimensioni dei dischi 
e delle pastiglie e altri particolari mecca- 
nici possono (a grandi linee) esser para- 


gonati al LM che, funzionante in una 
determinata auto, non funzionano se tra- 
sferite senza modifiche su un'altra auto 
per intuibili motivi: diverso peso della 
vettura, diversa lunghezza dei tubicini 
delLolio, diverso diametro dei dischi, di- 
verso posizionamento dei leveraggi dei 
pedali, eccetera, 

Insomma il Basic è quella parte dei 
calcolatore che, aiutata dai sistema ope- 
rativo (SO) utilizza razionalmente le ca- 
pacità del microprocessore. 

In conclusione: benché il linguaggio 
macchina sia più universale del Basic 
(considerando le istruzioni del micro) un 
programma scritto in LM per un modello 
differente, risulta di difficile adattamen- 
to al proprio calcolatore. 

□ Che differenza c'è tra Basic e LM? 

* 1J Basic, come qualsiasi altro linguag- 
gio ^evoluto”, rappresenta un “filtro" 
tra T utilizzai ore del calcolatore e il micro 
installato nel computer. 

Ad esempio, sapete benissimo che co- 
sa accade se scattate una foto utilizzando 
una moderna macchina fotografica del 
tipo a sviluppo immediato. E' sufficiente 
inquadrare e scattare: subito dopo fuo- 
riesce la foto già fatta. 

Non è certo la pressione del vostro 
dito a compiere il miracolo! Lo scatto, 
infatti, non fa altro che mettere in moto 
una serip di complicate procedure 
tecnico/chi miche legate insieme da deli- 
catissimi equilibri. Tutto il lavoro di svi- 
luppo e stampa è stato compiuto, in pre- 
cedenza, dai tecnici della casa fotografi- 
ca progettando e producendo, con gran- 
de accuratezza t prodotti da voi 
acquistati. 

La macchina fotografica e la pellicola, 
in definitiva, rappresentano tutto il lavo- 
ro compiuto "a monte” proprio per fare 
in modo che voi, con la semplice pressio- 
ne di un dito (e pagando.,.) possiate ot- 
tenere l'immagine desiderata. 

Piu è semplice l'uso di un apparecchio 
sofisticato, più contiene tecnologìa* 

Gli oggetti ad alto contenuto tecnolo- 
gico (computer, televisori, automobili) 


sono, appunto, complessi pur se semplici 
da usare. Al contrario, quelli a basso 
contenuto di tecnologia (matite, sedie, 
lampadine) sono semplici da realizzare 

Un linguaggio Basic da 8K vale meno 
di uno da 16K (a patto che siano ben 
strutturati entrambi). Analogamente un 
vecchio calcolatore, di quelli che funzio- 
navano solo con la programmazione in 
LM, è a basso contenuto, ., di linguaggio 
rispetto a uno che consente di lavorare 
anche con linguaggi evoluti. 

Un programma scritto in LM è scritto 
secondo la sintassi (un po' complicata) 
del microprocessore , Un programma in 
Basic, invece, sfrutta tutte le comodità 
(segnalazione dì errori* semplicità di 
espressioni, calcoli complessi risolti in 
modo semplice) introdotte dal fabbri- 
cante per render semplice l'uso del 
computer. 

Vediamo un ultimo esempio per me- 
glio comprendere la differenza tra Basic 
eLM 

E’ possibile avviare il motore dì un'au- 
to con un semplice gesto della chiave di 
accensione. 

Se, però, la batteria è scarica, la chiave 
non serve più ed è necessario che la vet- 
tura sia avviata a spinta. Ebbene il Basic 
rappresenta, in un computer, ciò che la 
chiave rappresenta per Lauto: la comodi- 
tà di utilizzo. Ciò non toglie che si posso- 
no ottenere effetti analoghi ricorrendo 
ad altri sistemi che, in un modo o nell'al- 
tro, riescano egualmente a far funziona- 
re il cuore del sistema (motore oppure 
micro a seconda dei casi). 

fi 11 LM ha una struttura più semplice & 
più complessa del Basic? 

* Il modo di programmare è decisamen- 
te più complicato a causa del numero 
apparentemente elevato dì istruzioni LM 
necessarie per realizzare "qualcosa". La 
struttura logica, comunque, è molto si- 
mile a quella del Basic. 

Vi sono istruzioni di salto (paragona- 
bili al GOTO), dì subroutine (GOSUB) 
di scelte condizionate (IF., .) dì operazio- 
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ni algebriche {+ -), operazioni logiche 
(AND, OR) e così via. 

Mentre, però, il Basic offre La possibi- 
lità di utilizzare righe di programma nu- 
merate ed t possibile inserire piu istru- 
zioni e comandi in una sola riga, col LM 
bisogna scrìvere una sola istruzione “per 
rigo ' (che rigo, vero e proprio, non è), 
trascrivere manualmente (munendosi, 
soprattutto agli inizi, di catta e penna) 
indirizzi e altre cose “importanti". 

Chi conosce in modo decente il Basic 
può certamente accostarsi ai LM, dato 
che la logica dì programmazione è straor- 
dinariamente simile. 


□ Quali vantaggi si ottengono da pro- 
grammi scritti in LM piuttosto die in 
Basic? 

□ Quali Inconvenienti comporta la pro- 
grammazione in LM? 

a Abbiamo detto che il Basic si “intera 
pone” tra il microprocessore e Putente. 
Il vantaggio è una maggior semplicità 
d’uso. Io svantaggio è rappresentato da 
una certa lentezza di esecuzione. 

E' come se, per mangiare un piatto di 
spaghetti, una bistecca e un frutto, deci- 
dessimo di andare al ristorante o di pre- 
pararci un pranzo a casa nostra. Nel pri- 
mo caso sì hanno innegabili vantaggi (co- 
modità di non cucinare, mancanza di 
piatti da lavare, eccetera). Nei secondo 
caso, a parte il risparmio di denaro, si ha 
un evidente risparmio di tempo dovuto al 
fatto che non à necessario spostarsi da 
casa e che è realmente possibile cucinare 
a tempo di record le semplici vivande 
indicate. Net primo caso occorre almeno 
un T ora; nel secondo, invece, in meno di 
mezz’ora possiamo soddisfare la nostra 
fame, 

Chi ha provato a realizzare in Basic 
giochi in cui si verificano animazioni 
(movimenti di sprite o dì caratteri) men- 
tre una musica, magari, suona in sotto- 
fondo, ha sicuramente notato i limiti im- 
posti dalla lentezza del Basic- Questo lin- 
guaggio, infatti, prima di eseguire un 
qualunq ue comando, esegue sempre (an- 
che se, in realtà, non sarebbe necessario) 


tutti i controlli tipici del linguaggio: esa- 
me della corretta sintassi, esame della 
posizione del cursore, esame delle loca- 
zioni video, eccetera. 

Se fosse possibile aggirare gli ostacoli 
dei controlli (che risultino realmente su- 
perflui), il programma girerebbe molto 
più in fretta. Ebbene, programmando in 
LM sì raggiunge proprio quest obbietti- 
vo: far eseguire al microprocessore sol- 
tanto le istruzioni necessarie evitando ac- 
curatamente quelle realmente superflue 

E* ovvio che è compito del program- 
matore individuare accuratamente i con- 
trolli superflui e stabilire con molta at- 
tenzione gli “ostacoli” aggirabili. 

Il pericolo, infatti, c T è ed £ grandissi- 



mo: in Basic, se sbagliamo a digitare 
un’istruzione, viene emesso un tìpico 
messaggio (SYNTAX ERROR o altri); 
lavorando invece in LM il microproces- 
sore, programmato male, prende luccio- 
le per lanterne e . . , può accadere di tutto, 
anche il blocco totale della macchina che 
è necessario spegnere. In questi casi, ol- 
tre al danno determinato dal tempo dedi- 
cato alla stesura del programma, rimane 
l'amarezza dì non sapere il perchè del 
blocco. 

Il computer comunque non subisce 
danni di nessun tipo, qualunque sia l'er- 
rore commesso. 


□ Con quaM computer è possibile scrive- 
re programmi in LM oltre che col Basic? 

□ E’ possibile scrivere un programma 
LM servendosi del Basic? 


□ A che servono le istruzioni POKE, 
PEEK* SYS? 

] Perche risulta complicalo {per non di- 
re imporaibìle} effettuare modifiche a 
programmi in LM scritti per altri compii 
ter, in modo da farli funzionare su calco- 
latori differenti? 

* Un programma in LM, come già det- 
to, è rappresentato da una successione di 
numeri che hanno, ciascuno, una simbo- 
logia ben precisa per il microprocessore. 

Per esemplificare il concetto* facciamo 
un semplice paragone, tra un comando 
Basic e uno simile (ma non proprio egua- 
le) al comando LM, 

Aj*"PIPPO” rappresenta, come è 
noto* la definizione di una stringa. Alta 
variabile A$ viene associata, col coman- 
do precedente. La stringa alfabetica for- 
mata dai caratteri “PIPPO”. Possiamo 
anche dire che, con AÌ=*TIPPO”, sì 
memorizza nella RAM del calcolatore la 
parola “PIPPO”. 

In LM i seguenti numeri (169 80 141 0 
192), scritti in successione, rappresenta- 
no, per il micro 6502, un ordine analogo; 
quello di memorizzare il codice ASCII 
della lettera "P", cioè 80, in una ben 
definita cella di memoria, 

Vediamo in dettaglio che cosa rappre- 
sentano esattamente i cinque numeri- 
codice prima indicati. 

169 80 Considera ìi numero 80. . , 

141 0 192 .. .e trascrivilo nella locazione 
di memoria m 192*256 +0-49152 

Avrete intuito che il numero 169 rap- 
presenta l’ordine: 

“prendi” il numero che viene subito do- 
po (in questo caso 80). 

Allo stesso modo il numero 141 signifi- 
ca, per il micro: 

scrivi il numero che hai appena "preso”, 
nella locazione di memoria il cui indiriz- 
zo va ricavato dai due numeri che vengo- 
no subito dopo il numero 141. 

Che cosa significa, ad esempio, la se- 
guente successione di numeri: 

169 65 141 5(1192 
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F semplice: prendi (169) il numero 65 
e scrivilo (141) nella locazione il cui indi- 
rizzo è dato dal calcolo: 50+192*256, 
cioè 49202, 

Torniamo alla domanda iniziale: con 
quale computer si può scrivere un pro- 
gramma in LM? Con qualsiasi computer, 
purché consenta di scrivere nella memo- 
ria RAM, si è in grado di utilizzare pro- 
grammi in LM 

Tutti i calcolatori Commodore hanno 
le istruzioni per compiere il miracolo: 

POKE* che consente di "scrivere” un 
qualsiasi codice macchina in qualsiasi lo- 
cazione di memoria; 

PEEK che consente di leggere il conte- 
nuto di una qualsiasi cella di memoria; 

SYS che consente di attivare un qual- 
siasi programma in LM 

Vediamo alcuni esempi. 

Esaminiamo il seguente programma 
Basic, funzionante solo sul C-16 e com- 
mentiamolo insieme. Subito dopo vedre- 
mo le altre versioni per ìi Vic-20 e per il 
C-64. 


90 REM COMMODORE C-16 
100 POKE 819,169 
110 POKE 820,1 
120 PO KE 821441 
130 PQKE 822*0 
140 POKE 82342 
150 POKE 824,% 

160 PRINT CHRS(147) 

170 PRINT 
180 SYS 819 


100 - Nella locazione 819 viene tra- 
scritto, grazie all'istruzione POKE. il nu- 
mero 169 che, come ricorderete, è il pri- 
mo codice del mini programma scritto in 
LM. 

Perchè, fra )e tante, è stata scelta pro- 
prio la Locazione 819? 

Dovrebbe esser noto che nel computer 
vi sono memorie di tipo ROM e RAM, 
Nelle prime non è possibile “scrivere" e, 
di conseguenza é necessario escluderle 
per i nostri scopi Alcune locazioni 
RAM. inoltre, sono riservate al sistema 


operativo e* benché sia possibile scriver- 
vi mediante istruzioni POKE* è bene evi- 
tare di servirsene* altrimenti si rischia di 
“inchiodare" il sistema. Dobbiamo tener 
conto, ancora, che se scriviamo un pro- 
gramma Basic* questo occupa; man ma- 
no che viene digitato (oppure caricato da 
nastro o da disco) una zona di memoria 
RAM ben precisa, che nel C-16* ad 
esempio, parte dalla locazione 40% c oc- 
cupa* in totale* una zona di memoria 
proporzionale alta lunghezza del pro- 
gramma stesso. Tentare di scrivere qual- 
cosa nella zona del Basic significa cancel- 
larlo in parte e, in ogni caso* alterarne il 
contenuto. 

PeT brevi programmi* allora, rimane 
una zona di memoria RAM che serve 
abitualmente al computer per il “collo-' 
quio" col registratore. Questa zona (a 
disposizione dell'utente a patto che, du- 
rante l'uso, non venga usato il registrato- 
re) è un blocco di RAM che. nel C-16* è 
numerato da 819 a 11110. 

Nel C-64 e Vic-20, invece* la zona 
RAM dedicata al registratore (detta, più 
propriamente* “cassette buffer") è nu- 
merata da 828 a 1019. 

1 10450 - Vengono trascritti uno per 
uno* nella zona RAM indicata* i codici 
macchina che rappresentano, ciascuno* 
un comando (169* 141) oppure un “argo- 
mento 1 ' del comando stesso (0, 12). L'ul- 
timo codice (%) significa, in LM, un 'ri- 
torno'" al Basic. 

160-170 - Cancella lo schermo e posi- 
ziona il cursore un rigo più in basso, 

180 - SYS è il comando Basic che im- 
pone al computer di “entrare" in lin- 
guaggio macchina “abbandonando", ov- 
viamente, lo stesso linguaggio Basic. Da 
questo momento il microprocessore, an- 
ziché eseguire il programma Baste, ese- 
guirà il programma in linguaggio macchi- 
na, che inizia a partire dalla locazione 
numerata col valore della SYS che, nel 
nostro caso, è proprio 819, Ma in 819 è 
presente prono la prima istruzione LM 
trascritta am la POKE di riga 100 e il 
microprocessore eseguirà il programma. 
Vediamo quale risultato sì ottiene, 


169 1 “prende'* il numero 1. 

141 0 12 "scrive" il numero uno conside- 
rato in precedenza (169 1) e lo "deposi- 
ta" (141) nella locazione 12*256+0, cioè 
nella cella 3072. Ma questa è una cella 
della memoria del video del C-16 e il 
risultato è simile a quello ottenibile in 
Basic con POKE3072*U. Compare* cioè* 
iE carattere *W* in alto a sinistra sul 
video. 

% subito dopo aver depositato il numero 
0 nella locazione 3(172* questo codice im- 
pone al microprocessore di “restituire" il 
comando al Basic. 

Il listato* però, è complicato c può 
esser sicuramente semplificato ricorren- 
do alle istruzioni READ... DATA, Ec- 
co* in questo caso* un modo per trascri- 
vere un programma LM con i tre compu- 
ter della Commodore: 


1(X) REM C-16 
no FORi=irrt>5 
120 READ A 

I30POKE819+I,A;NEXT 
140 DATA 1694*141.0,12*% 
150 PRINT CHR$( 147) 

160 PRINT 
170 SYS 819 


100 REM C-64 
HOFORI-OTG5 
12(1 READ A 

130 POKE 828+1, ArNEXT 
140 DATA 1694,141*0,4,% 
150 PRINT CHRt( 147) 

160 PRINT 
170 SYS 828 


100 REM VIC-20 IN ESPANSO 
110 FOR 1=0 TO 5 
120 READ A 

130 POKE 828 +I*A:NEXT 
140 DATA 1694*141*0*30*96 
150 PRINT CHR$( 147) 

160 PRINT 
170 SYS 828 

R 
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Nel Vie 20 (come pure in alcuni anti- 
quati usempan di C-64) è necessario co- 
lorare la cella video prima di eseguire il 
programma. In questi casi è necessario 
premere il tasto Home (senza Shift), do- 
po aver fatto girare il programma, per 
veder lampeggiare la “A" sotto il 
cursore. 

Avrete notato sicuramente che, per 
ottenere lo stesso effetto sui tre computer 
(visualizzazione del carattere M A" nella 
prima cella in alto a sinistra dedo scher- 
mo), è necessario “personalizzare"’ il 
programma in LM benché la sintassi sia 
sempre la stessa, Fondamentale, inoltre, 
à la stessa struttura della memoria del 
calcolatore. 

Se, per fare apparire semplicemente 
un carattere sullo schermo, è necessario 
effettuare modifiche al listato LM, figu- 
rarsi il lavoro da svolgere per adattare 
programmi interi lunghi migliaia di 
codici-macchina! 

E pensare che si ottiene lo stesso effet- 
to, sui tre computer, col semplice listato 
Basic: 

100 PRINTCHR$(147)“A ' 

E' ovvio che, per fare apparire un ca- 
rattere sullo schermo non è consigliabile 
servirsi del LM, 

Vedremo, nei prossimi numeri di 
Commodore Computer Club, che ih altri 
casi iILM è realmente più utile del Basic. 



C ] Come si può scrivere un programma 
in LM? 

□ Che cosa è FAjssembler? 

□ Che cosa sono i codici mnemonici del 
LM? 

* Abbiamo visto che un programma LM 
(che altro non è se non una successione 
di numeri interi compresi tra zero e 255), 
può esser semplicemente trascritto in 
un'area RAM mendiante un programma 
Basic che, sfruttando adeguatamente le 
istruzioni READ, DATA, POKE, 
FOR, NEXT, legge i vari codici e li “po- 
ka" nelle locazioni desiderate. 

Un altro sistema consiste nell utilizza- 
re programmi specifici che aiutano a digi- 
tare i codici LM. 

Nel C-16 (e nel Plus^4). ad esempio è 
incorporato il programma Monitor, Per 
il C-64 c il Vie 20 sono disponibili pro- 
grammi analoghi che. però, è necessario 
caricare da nastro o disco per utilizzarli. 
Nei prossimi numeri di Commodore 
Computer Club diremo, un po’ per vol- 
ta. come utilizzare i vari programmi 
Monitor. 

Un altro sistema, molto più valido, è 
quello di utilizzare specifici programmi 
Assembler che aiutano moltissimo a 
stendere un programma in LM. 

Precisiamo anzitutto che per program- 
ma Assembler si intende un programma 
scritto mediante un programma compila- 
tore chiamato Assembler. Quest'ultimo 
è un utility che facilita la stesura di un 
programma LM perchè ricorre a istmzio 
ni simboliche molto più facili da ricorda- 
re che non i codici numerici del linguag- 
gio macchina. 

Consideriamo, ad esempio, il pro- 
gramma “puro ' in LM di prima: 

16911410 12% 

Anziché scriverlo come un gruppo 
ininterrotto di cifre, sarebbe meglio scri- 
verlo nel modo seguente, raggruppando 
tra loro, cioè, i codici che si riferiscono 
ad una singola istruzione: 


169 1 Considera il numero 1 

141 (J 12 “Scrivilo" nella locazione 

12*256+0 

96 Ritorna al Basic 

Lo stesso programma, scritto in As- 
sembler, diventa enormemente più 
chiaro: 

LDA 1 
STA 3072 
RTS 

LDA è il codice mnemonico (derivan- 
te dall'inglese Load Aecmnul 3 tor=cari- 
ca neh 1 accumulatore) che indica lordine 
di caricare (scrivere) nell'accumulatore 
(memoria spedale presente all'interno 
del micro) il numero che segue (nei no- 
stro caso particolare, 1 ). 

STA è il codice m Demonico (STore 
Accumulator) che impone di memoriz- 
zare il contenuto del! accumulatore nella 
locazione il cui indirizzo è indicato dal 
numero che segue (proprio 3072) senza 
che sìa necessario effettuare scotìi ode e 
noiose “traduzioni" (12*256+0=0072). 

RTS significa ReTum troni Suhrouti- 
ne (ritorna dalla subroutine). Nel caso 
Specifico significa: ritorna al Basic 

Naturalmente i codici mnemonici so- 
no molti di più c alcuni di essi possono 
assumere significati differenti a seconda 
dei caratteri posti subito dopo di loro 
(virgola, punto, dollaro, eccetera), 

IL linguaggio Assembler, che è un com 
piìatore, è un compendio validissimo per 
chi vuole programmare in LM perchè, al 
vantaggio di ottenere un programma 
scrittoio LM, aggiunge quello di render- 
lo comprensibile e “scorrevole*' anche ai 
meno esperti, 

I i L’ necessario iwr mollo bravi in ma- 
tematica per imparare il LM oppure 
F Assembler? 

* Nel campo dell'informatica è mdi- 
spensabila avere pazienza e frenare lim- 
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pulso di bruciare le tappe per imparare in 
fretta. Ragazzi giovanissimi, spesso più 
preparati ed esperti di personale laurea- 
to, hanno acquisito la propria esperienza 
non grazie a un intelligenza “superiore”, 
ma solo applicandosi con costanza al cal- 
colatore, Molti, strano a credersi, odia- 
vano la matematica prima di accostarsi al 
computer Ci sono giovani, infine, che 
hanno dimostrato notevoli miglioramen- 
ti a scuola da quando hanno iniziato a 
smanetiare sulla tastiera. 

Nel campo del linguaggio macchina > 
credetemi, è sufficiente sapere le sole 
quattro operazioni. Al resto provvedono 
la fantasia e la serietà di chi lo utilizza, «♦ 


L- Per utilizzare programmi in LM è ne- 
cessario conoscerne il linguaggio? 

* Niente affatto: sicuramente avrete ca- 
ricato sul vostro computer, almeno una 
volta, un videogioco. Ebbene, sappiate 
che il 99% dei videogame sono scrìtti in 
LM, ma questo fatto non vi ha impedito 
di utilizzarli e di divertirvi. 

4 » 

Se vi accingete, ai contrario, a digitar- 
li, leggendoli da una rivista (come Com- 
modore Computer Club) dovete presta- 
re la massima attenzione a digitare ì valo- 
ri cosi come sono, senza sbagliare la tra- 
scrizione di un solo dato, che potrebbe 
esser fatale per il funzionamento del 
programma. 

In genere, però, lo stesso programma 
contiene al suo interno un minimo di 
controllo che avverte l’utente che è stato 
commesso un errore di trascrizione. 

L E 1 possibile danneggiare il computer 
scrìvendo un programma LM in modo 
errato? 

* No, in nessun caso, Leirore più “gra- 
ve” che sì può commettere è il tentativo 
di scrivere un dato in una zona ROM 
invece che RAM Anche se questa ope- 
razione viene eseguita milioni di volte (e 
può capitare se si incorre in un loop chiu- 
so) nessun danno pud esser provocato 



alla ROM nè a qualsiasi altro circuito. 

Se un programma LM è scritto male, 
oppure è mal progettato, può capitare 
che i numerosi tentativi effettuati per “ri- 
prendere” il controllo del computer 
(Run/stopeRestore, tasto dì Reset ecce- 
tera) non sortiscano alcun effetto. In casi 
come questi Punico modo per riprendere 
il lavoro consiste nello spegnere e riac- 
cendere l'apparecchio (e le periferiche 
col legate) perdendo, però, il programma 
digitato. Ecco perchè è buona norma re- 
gistrare sempre un programma LM op- 
pure Assembler prima di mandarlo in 
funzione. Se non dovesse funzionare, 
non sarete costretti a riscriverlo ex- novo, 
ma sarà sufficiente ricaricarlo (da nastro 
o disco) ed esaminarlo attentamente in 
modo da rintracciare (ed eliminare) 
Terrore. 

O Perchè, per lavorare in LM t non è 
sufficiente la matematica che cono- 
sciamo? 

□ Che cosa è la notazione binaria? 

□ Che cosa è la notazione esadecimak? 

I. J t ome si può convertire un numero 
decimale nel relativo binario ed 
esadecimale? 

♦ Abbiamo detto prima che i numeri- 
codice di un programma in LM sono 
compresi tra zero e 255. Ciò è giustificato 
dal fatto che un microprocessore a otto 
bit (come appunto quelli montati sui 


computer Commodore), possono “trat- 
tare' 1 otto simboli per volta, ciascurtp dei 
quali può valere solo “1” oppure "0”. 

Vediamo di chiarire questo importan- 
te concetto, che rappresenta il fonda- 
mento dell'Informatica, 

Noi siamo abituati già alla notazione 
binaria (=due simboli soltanto) anche 
senza che ce ne rendiamo conto. Consi- 
deriamo, infatti, gli indicatori lampeg- 
gianti dì direzione di una qualsiasi auto- 
vettura ed esaminiamo j vari casi che pos- 
sono presentarsi: 

a nessuna delle due lampadine lampeg- 
gia, Ciò significa che l’auto procede dirit- 
ta (oppure è parcheggiata) e che Ta ato- 
mo btlista non ha intenzione dì svoltare; 

* lampeggia il solo indicatore destro. 
Ciò significa che tra breve l’automobile 
girerà a destra; 

* lampeggia Tindkatore sinistro. L’auto 
svolterà a sinistra; 

* lampeggiano entrambe le lampadine. 
L’automobile è ferma in corsia di 
emergenza. 

Con sole due lampadine (destra e sini- 
stra) è possìbile generare quattro “sim- 
boli” diversi. 

fi numero quattro deriva dal numero 
due (le possibilità, cioè lo stato di “acce- 
so” oppure “spento”) elevato al quadra- 
to (il numero delle lampadine), 

Schematizzando l'esempio, te quattro 
possibilità possono essere indicate nel 
modo seguente: 


Lampadine 

Sitila, 

Des. 

0 

0 

0 

1 

l 

0 

1 

1 


Nel caso di un semaforo, che è forma- 
to da tre lampade, sarebbe possibile ge- 
nerare un numero di due (stati possibili) 
elevato alla terza (numero di lampade), 
cioè otto simboli diversi. Schematizzan- 
do come prima si ha: 
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Lampada 


Significato 



Verde 

Giallo 

Russo 


0 

y o 

0 

(Semaforo non funz. ) 

II 

0 

1 

(Alt) 

0 

1 

0 

(Attenzione) 

0 

! 

I 


1 

0 

1J 

(Via libera) 

1 

0 

1 


1 

1 

0 

(Affrettarsi) 

! 

1 

1 



Come si può notare, è possibile indivi- 
duare nel traffico stradale un numero 
inferiore di stati possibili. 

Se invece di lampadine parliamo di bit 
e, invece di acceso e di spento, di “uno" e 
di "zero”, il discorso di base sul linguag- 
gio macchina non costituisce più un 
problema. 

Riepilogando, avendo a disposizione 
otto hit (lampadine) , ognuno dei quali 
può essere in uno solo di due stati (1, 0, 
oppure On, Off, eccetera) quante com- 
binazioni è possibile ottenere? 

2 elevato all’ottava potenza = 25h sim- 
boli diversi, proprio come abbiamo detto 
prima. 

Il "primo'" è costituito da un numero 
di otto zero (00000000), l’ultimo da un 
insieme di otto “uno" (11111111), 

II calcolatore, dunque, “ragiona” solo 
con gli zero e gli uno. Sarebbe un guaio 
se anche noi dovessimo scrivere un pro- 
gramma ricorrendo a due soli simboli. 
Fortunatamente c'è un sistema che con- 
sente di trasformare un qualsiasi numero 
binario (formato normalmente da otto 
bit) nel corrispondente decimale. 

Vediamo un esempio. 

A quale numero decimale corrisponde 
il numero binario di otto bit 10010101? 

Si considerino i simboli uno a uno. 
Rappresentano resistenza" (se è ugua* 
te a uno) della potenza dì due corrispon- 
dente. In caso contrario (—0) ne denota- 
no t’as&enza. 


Spieghiamoci meglio scrivendo il nu- Semplicemente il “posto" che quel 
mero in verticale, anziché in orizzontale, simbolo occupa nella numerazione alVin- 
Vale a dire, invece dì 10010101, terno del byte (insieme costituito dagli 
scriviamo: otto bit). Il primo simbolo a sinistra è il 


La corrispondente 
La corrispondente 
La corrispondente 
I .a corrispondente 
La corrispondente 
I a corrispondente 
La corrispondente 
La corrispondente 


potenza di 
potenza di 
potenza di 
potenza di 
potenza di 
potenza di 
potenza di 
potenza di 


due esiste 
due non esiste 
due non esiste 
due esiste 
due non esiste 
due esiste 
due non esiste 
due esiste 


Che cosa si intende con il termine settimo, il secondo è il sesto e così via 

“corrispondente"? ^ intl P^ rao a destra che rappresenta il 

bit di “peso" zero. 
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11 numero due (e qualsiasi altro nume- 
ro) elevato alia potenza zero, fornisce 
come risultalo 'T* e non zero come po- 
trebbe sembrare a prima vista. 

Si noti inoltre, che il <f pe&o , \ cioè le 
posizioni, sono numerate da "7" a "0" e 
non da “8” a ‘T‘: anche zero è un 
numero! 

Il numero binario ! 00 IO 101 corrispon- 
de dunque al decimale: 

128+1644 + 1:149 

La notazione binaria è costituita da 
due soli simboli (0/1); quella decimale da 
dieci (0, 1, 2, 3> 4, 5, 6 T 7, 8, 9); quella 
esadecimale, dì cui si sente spesso parla- 
re, da ben sedici simboli. Questi sono i 
'soliti'" dieci della decimale, più le lette- 
re dell’alfabeto A, B,C ( D, E, F. 

Per ciò che riguarda la corrispondenza 
tra le due notazioni, si tenga presente che 
per i valori tra zero e nove, la decimale e 
la esadecimale sono perfettamente iden- 
tiche. Le cose cambiano da 10 a 15. 

Vediamo: 


Decim 

Bsad. 

9 ; 

9 

10 

A 

11 

B 

12 

C 

13 

D 

14 

E 

15 

F 


E per i numeri maggiori dì 15? E' 
intuitivo... 


Decim. 

Esad . 

16 

10 

17 

li 

31 

§ B » 

1F 

<iit 

74 

+ ■ ■ 

4A 

255 

FF 


Per esercizio, ‘‘inventatevi” un nume- to utilizzate it programma riportato in 
ro compreso tra zero e 255 e “traducete- queste pagine per controllarne la corret- 
to" in binario e in esadecimale, In segui- ta conversione. 



100 

110 - 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

830 

840 

250 

260 

270 


REM CONUERSI ONE 
REM DA DECIMALE 
REM A BINARIO 
REM ED ESADECIMALE 

•i 

INPUT "NUMERO DECIMALE C0-255V‘ S ND 
X~ND : A$~ 11 11 

I FND> 2550RND< 0ORND< > I NT C ND ) THEN1 50 
FDRI-0TO7: Y-X/2 

IFYO INTCYÌTHENAS-”! "+A$ : GOTO210 
A$-”0’ J +AS 

X-INTCY3 : NEXT: FRI NT "BINARI 0 "A$ 
X-ND/16; Y-INTCX3 : X-CX-YD*16 
FRI NT "ESADECIMALE 
I FY< I0THENPRI NTY ; : GOTO2G0 
FRINTCHRSC55+YD ; 

IFX< 10THENFRI NIX j : FRINÌ: 
PRTNTCHRSC55+X3 : PRINT: RUN 
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DIDATTICA 


DI che 
lingua sei? 

Ci sono più 
linguaggi di 
programmazione o 

di 

“comunicazione ”? 
Come scegliere il 
più adatto alle 
nostre esigenze? 


di D.K. Ma Itti rro -M.L Nitti 



D ,. 

a^h anni 50. periodo di nascita dei 
primi linguaggi evoluti, ad oggi sono stali 
creati tanti codici di programmazione 
che se na è perso iJ conto, senza parlare 
dei vari “dialetti " che crescono intorno a 
ognuno di questi. Per nostra fortuna non 
sono tutti correntemente in uso. anzi, il 
conto di quei li d utilizzo comune puri es- 
sere tranquillamente tenuto sulle dita 
delle mani. 


Quali problemi, quale linguaggio? 

In primo luogo ci si domanda che cosa 
giustifica un così spropositato fiorire di 
“gerghi"' t\ subito dopo, ci si chiede quali 
siano le loro differenze. 

Le risposte si intrecciano tra loro, fino 
a diventare un'affermazione unica: 

Differenti esigenze di appth azione 
conducono a differenti linguaggi, di pro- 
grammazione che si diversificano in base 
alle necessita che li originano. 

Questo gioco di parole ci conduce a 
una prima constatazione: 


Un lirtKuagftio di programmazione è 
generalmente orientato alia soluzione di 
uìì certo tipo' di problemi. 

Per toccare con mano la cosa, torna 
utile inquadrare un paio di applicazioni 
straordinariamente differenti tra loro, 
quali la gestione di archivi su disco (molti 
dall, richiesta di precisione modesta, ri- 
cerca rapida di un dato tra migliaia) e il 
calcolo astronomico (pochi dati, preci- 
sione elevatissima, calcoli sofisticati, 
programmi relativamente brevi). 

Difficilmente riuscirete a trovare un 
linguaggio capace di gestire con altrct- 
tanta efficacia la programmazione di 
software dedicato a entrambi i campi 
d’applicazione accennati poiché dovrete 
he trattare t file in modo superlativo e 
nello stesso tempo avere istruzioni di; cal- 
colo estremamente complesse. 

Interpreti e compilatori 

Un’altra differenza sostanziale risiede 
nelle modalità di “traduzione" de! 
linguaggio. 


Per esser compresi anche dai letlon 
meno esperti, conviene aprire una pa- 
rentesi esplicativa su cièche rappresenta 
un linguaggio e sulle relative modalità di 
intervento sui calcolatore. 

In primo luogo occorre precisare che 
esiste un solo “codice" comprensibile 
per il computer: il linguaggio macchina 
(LM), E’ composto di numeri e. in parti- 
colare, di cifre in numerazione binaria. 
Le istruzioni di questo “originario" lin- 
guaggio sono molto “piccole" rispetto a 
quelli che vengono definirà linguaggi 
"evoluti” o ad “alto livello". 

Per esempio, un singolo PRINT de! 
Basic corrisponde ad alcune decine di 
istruzioni in LM . tanto é vero che le istru- 
zioni dei linguaggi ad alto livello vengo- 
no anche definite “macroistruzioni" (dal 
greco: maero = grande). 

Un programma “traduttore" permette 
di utilizzare le macroistruzioni del lin- 
guaggio evoluto poiché ne traduce il si- 
gnificato in adeguate “routine" di codice 
macchina. La differenza cui sì accennava 
in apertura, risiede proprio nel mi>do in 
cui ta "traduzione"’ viene effettuata. 
Quando un linguaggio è interpretato 
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I Scotch è un marchio 
E distribuito nei migiion negozi 
[ di audio, video e fotografia 
I con una gamma completa 
I per dove da 5V* M e da 3 Va ' \ 


La 3M, leader nella tecnologia dei 
supporti magnetici, sa quanto sono preziosi 
i dati che affidi alla memoria del tuo 
personal computer. Ecco perché ha messo 
a punto una nuova linea di diskette Scotch 
che sfruttano la sua ineguagliata 
esperienza per offrirti un'affidabilità 
assoluta e una durata tale da consentire di 
leggere ogni pista milioni e milioni dì volte. 
Inoltre queste diskette straordinarie 
concorrono ad assicurare una lunga vita 


DISKETTE SCOTCH: ANNI MEMORIA IN AVANTI. 



E 1 un prodotto Scotch 


al tuo drive, grazie ad un’abrasività 
nettamente al di 
sotto della media. 

Scegliendo Scotch, 
quindi, sei sicuro 
di scegliere bene. 

Scotch 

D 1 a K E T T E S 










DIDATTICA 




Per aiutare a sfruttare appieno 
le possibilità del tuo computer 
e di queste nuove diskette, 
oggi Scotch ti regala 
i manuali delia collana 
specializzata Systems. 

Infatti ogni confezione da 10 
diskette Scotch 1S2D RH da 51V’ 
avrà abbinato uno dei volumi 
della collana Systems 
selezionati per te.., 
e inviando tre prove riacquisto 
avrai in omaggio 
anche il grande 
Dizionario dell'Informatica. 


(vedi interp fÉle Basic) la traduzione t 
simultanea, nei senso che viene eseguita 
durante l'esecuzione (RUN) del pro- 
gramma oppure direttamente, da tastie- 
ra, In questo caso, infatti, è possibile 
dare comandi diretti alla macchina. 

I programmi compilatori* invece, non 
possono eseguire la traduzione diretta di 
comando* ma devono passare attra- 
verso la fase, appunto, di compilazione. 
Dapprima convertono il programma pre- 
cedentemente scritto in un certo modo 
(che in questo caso assume il nome di 
“sorgente"). In seguito passa attraverso 
a varie fasi di compilazione, 

In pratica, il programmatore deve scri- 
vere interamente il programma prima di 
poterlo provare. Una volta stilato il “sor- 
gente'’ lo si “compila" ottenendone una 
nuova versione, tradotta in LM che 
prende nome di “oggetto”. Solo questa 
versione può essere eseguita daH’utiliz- 
zatore finale, E h ovvio che* se è stato 
commesso un errore, è necessario ripete 
re interamente l'operazione dato che 
correggerlo non è cosi semplice come nel 
Basic. Una volta messo a punto* però, il 
programma compilato è decisamente piu 
veloce ed efficiente rispetto a un 
interprete. 

Non dimentichiamo* inoltre* che esi- 
stono diversi programmi per il Commo- 
dore 64 che consentono di compilare 
programmi scritti in Basic. Non possono 
esser considerati veri e propri compilato- 
ri ma* riescono a velocizzare enorme- 
mente Telaborazione dei listati Basic* 
specialmente se si lavora con le matrici. 

Velocita contro praticità d’uso 

Dal punto di vista dei tempi necessari 
alla correzione, prova e verifica dei pro- 
grammi è molto più conveniente utilizza- 
re linguaggi interpretati. Considerando 
la cosa dal punto di vista della velocità di 
esecuzione, sono invece senza dubbio 
più indicati i compilati, poiché vengono 
eseguiti direttamente in codice 
macchina. 

Bisogna aggiungere che la maggior 
parte dei linguaggi esiste solo in forma 
compilata e sono pochi quelli interpreta- 
ti* quali il Basic o il Logo oppure, forse* 


qualche introvabile versione di Fortran. 

Le tendenze dei ricercatori sono però 
orientate verso formule di linguaggio 
molto vicine alla lingua parlata e in ver- 
sione, per di più. interpretala. Linguaggi 
della quarta generazione come ad esem- 
pio Prolog possono esistere solo se utiliz- 
zabili in modo diretto perchè più sempli- 
ci da usa re soprattutto da coloro che non 
son pratici di informatica, 

I n programma per tanti linguaggi 

Presentiamo qui di seguito la versione, 

] ri diversi linguaggi, di un minigioco* allo 
scopo dì esaminare pur se in modo super- 
ficiale* le differenze esistenti tra vari 
linguaggi. 

Il gioco è molto semplice: si tratta dì 
indovinare un numero. Il programma 
sceglie un numero tra 1 e 11M), analizza le 
risposte di chi tira a indovinare e suggeri- 
sce se aumentare o diminuire il tiro, fino 
a ottenere La risposta esatta. 

In queste pagine vi sono quattro prò- 
cedure scritte in Pascal* in Fortran, in 
'*C”e in Basic* anche se in realtà il lin- 
guaggio che più si presta alle realizzazio- 
ni di giochi interattivi è* come sanno gli 
affezionati, proprio il Basic. 


Indovina un numero In Pascal 

program indovina(mput*output); 
var ans: char; 

numero* mionumerounteger; 
begìn 
am V; 
mk>numero-==0; 
repeat 

rancanti mero); 

while ( raion intiero <> numero) do 
begin 

writeln^ scrivi un numero’); 
readln( raion urne ro) ; 
if( mionumcro > numero) 
then writelnf’ troppo grande’); 
else writeln(’ troppo piccolo’); 
end 

writeìn(’bravo! hai indovinato'); 
writeinf vuoi giocare ancora ? T ); 

readln(ans); 
unti! ( ans <> V) 
end. 
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DIDATTICA 



Concessionari 
Memorex 
Computer Media 


indovina un numero 
in Fortran 

C’ indovina un numero Iru 1 u UK) 
program indovina 
charactcr ans 

100 cali ra ridi (x) 

numero = x* imi 

200 print* , dimmi un numero’ 
readVmiotmm 
if ( mionum.lt, numero) then 
prim Vtroppo basso’ 
else 

if (mionum.eq. numero) then 

printVbravo* hai indovinato!' 
printVvuoi giocate ancora? 1 
read (*,300) ans 
if(ans,eq. V)gotolO0 
stop 

cndif 

prim Vtroppo alto 
endif 

goti >200 

300 format(al) 

end 


Indovina un numero in C 

include <stdio.h> 
main() 

a 

ma 

int numero, mionumero; 
char ans; 
ans = V; 
mionumero = 0; 
while ( ans == V) 

a 

whmumero = rand{); 

while (numero != mionumero) 

{{ 

w hile pnntfrV/N strivi un numero //n") 
scanf(' ( %d ”,&mionumero); 
ifl mionumero > numero) 
printf(‘7/N diminuisci 11 ); 
else 

pnntf(“//n aumenta' 1 ); 

}} 

printf(“7N bravo! hai indovinato 11 ); 
printff"'/N vuoi giocare ancora ? ”); 
scanf("%t",<feons); 
mionumero t0; 

}} 


F.cli' per 1 1 t i ' n< i fi 1 Maro in Raric ■'M quale non c'è molto da dire. 


Indovina un numero in BASIC 

10 MN=0 

20 N=INT(RND(0)*100) 

30 INPUT "DIMMI UN NUMERO T ;MN 
m IF MN >N THEN FRINÌ TROPPO GRANDE 1 1 : G OTO30 
50 IF MN<N THEN PRINT TROPPO PICCOLO 11 :GOTO30 
60 PRINT “BRAVO, HAI INDOVINATO!" 

70 INPUT “VUOI GIOCARE ANCORATANE 
80 IF ANI =“S" THEN 10 
90 IF ANST N ,T THEN END 
100 PRINT “NON HO CAPITO” 

110 GOTO 70 


è importante scegli 

MEMOREX 

A Sùmjughs Company 


Si suppone che la funzione Tand" re- 
stituisca un numero a caso tra I e 100. E 1 
inoltre necessario precisare che non £ 
una funzione di biblioteca del Pascal. Il 
gioco continua finché non viene risposto 
“n” alla domanda. Si osservi l’eleganza 
della strutturazione logica del Pascal. 

Abbiamo usato una versione non trop- 
po "sofisticata" di Fortran, per mostrare 


una strutturazione diversa del program- 
ma. La subroutine Tandl 11 restituisce 
nutnen a caso con distribuzione unifor- 
me tra 0 e 1. Non è una funzione di 
libreria > Si pud osservare come la ripeti- 
zione del gioco a seconda della risposta 
debba necessariamente avvenire con un 
"salto 11 . 


TORINO 

COMPUTER MEDIA 

Via 5 usa. 3? - Tel Oli /44 226 1 / 441 02 T 


BieuMvc* 

CO FfN 

V*a Éten-gasi. 2 Tel 015V3CI23T 


CUNEO - VIOLA 
BA C 

Via Martini, tifi - Tei. Ot 74/73220 


GENOVA 

fi&C 

via Coi in Cane S/E9- i&i 010/41B719 


MILANO 

LOGOTFC 

VlaPacifl ,72 -Tei 02/292077/235539 


MILANO 

GASP* 

Vidi PFiqChm ' - Te 02/225806 


MONZA (M(| 

COMPUTER CITY 

Vie San Gottardo, HA Tal 0397.126293 


GALLARATE (VA| 

EMMtQUATTRQ 

Vie Pagqrerp, 18 - Tel 0331/795246 


VIADANA (MN) 

PAH 

V<a M D'AieelJa, 29 * Tel 0a76/B1&74 


CÓNEGLIANO VENETO (TV| 

dal cìn elio 

Via Manin, S9/A- iti 043tì/tì3i44 


PARMA 

GHI-&Q 

ViaRuvesmi. f - 1 Fi 0521 '995332 


BOLOGNA 

FftADCF S INE 

ViaMOrgngr'i 8 -T^l Q51/2/I072 


SAN LEON ARDO fFO) 

IL CENTRO FDP 

Y.J Ar rutiline. 19 - Tel. 0543 J 7L!fl09i 


ROMA 

M£MWtVLW£ 

Vi» Mumenlana. 224 - Tel 06/3320040-0320434 


BARI 

NICOL A ROBERTO CAVALLO 
Via Durarlo, 1 7 - Tei. 030/300499 


VI BO VALENTIA (CZ) 

8 A 8. 

Via Più XII, 14 - Tal. Q96/343609 


SASSARI 

ORE 

Zona InduSI naie PrBdda Ni adda 
Tel. 079/260477 


SARDEGNA 

HA R ELECTRONICS 

Vie Fratelli Canapa. 94 - Serra Hiclu(GL) 
tal 01 0/7 SO 7£9~ 750666 


PALERMO 

ErTE'SHOUSt 

Via Vann'Anlo, 28 ■ Tel 091 zzai 1 54 


LIVORNO 

INFORMATICA 

Via Scali dtìy li ÙSande^i 54 Te- 0566- oOUUZ 


ANCONA 

PRISMA 

Corso Carro A 'berlo 13- Tel 071/899262 


PESCARA 

SEFIN 

Via Panni 21 ■ Tel GB5/23B32 


SALERNO 

SYNCRQNDATA 

Via Paola rfr* Granila. 1 4 - 


PERUGIA 

R2 (NFORM 

via XX Settembre. 70 • tei. O7S/6if)Q0-7 2266 


Tel 009/241*10 
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Teo Rusconi ha appena 


sfatato la leggenda 


secondo la quale i floppy disc 


sono tutti uguali 


Di fatti sembrano lutti uguali finché non 
si osserva con attenzione il jacket, Qui 
termina l'uguaglianza. 

La maggior parte delle società costruttrici 
sigillano i dischi un punto qui un punto là. 
lasciando parte dei lembi non sigillati. 


Prima o poi ai lembi accadono cose 


naturalissime: si gonfiano, si curvano, si 
raggrinzi scono.., in poche parole si aprono. 




rm 


m 


M 


N 


tto t 


M flit 


II 




GL! All RI DISCHETTI 


l'hLUìi Un punlu qui. 


un punld 1,1 Jusctànu 


fe^iL Itane <Un 


lemiPi ;ì|>.tej 


'■% 5. 


V\ 


ÌP 


X 


X 


Sf 


\\\\s 


DISCHETTI ME MORE X 

con le rnhi rampktamcnlc 

hdliluLi bLI iuica 

h ifuperfkk 


/V 


/ 


k 






irtP* 


■rtt 


-, 








Con penne, matite, unghie persino un 
ragazzino di quattro anni come Teo può 
infilarsi in quegli spazi aperti. 

Naturalmente c un danno enorme perche 
se si inserisce qualcosa di molle e slabbrato 
nel di se -drive quest 1 ultimo può incepparsi; 
si può rovinare la testina e si possono 
perdere i dati, Questo può accadere con gli 
abituali sistemi dì chiusura ma non con ì 
dischetti Memorex che usa un 
procedimento esclusivo chiamato 
“Solid-Seam BondingT 

Con questo sistema ogni singolo 
millimetro quadralo dei lembi di tutti i 
dischi Memorex viene sigillato 
ermeticamente, rendendoli più rigidi e più 
resistenti. 


1 * Tkk . 


È un sistema che consente al floppy disc 
di sostenere ogni assalto, che impedisce alla 
testina dì rovinarsi e ai dati di andare perduti. 

Il che sta a dimostrare che un fioppv disc 
Memorex non è uguale a tutti gli altri: è 
migliore. E il sistema di saldatura è solo un 
esempio della cura infinita con cui viene 
prodotto ogni floppy disc Memorex: sia 
esso da 8", da 5 1/4" o il nuovo 3 1/2" 
Questa estrema accuratezza dà la garanzia 
che ogni disco Memorex è al 100% perfetto. 

La prossima volta che acquistate un 
floppy disc - o qualche centinaio 
- ricordate: non tutti i dischetti 
sono uguali... 

Memorex vi mette al 
riparo da qualsiasi 
inconveniente. 


MEMORO 


m>RfiOUG^ MÈMORE* S P. A 

Qiniiicfle Computer 
V-aCrOM^K.tl , 14 Tei 02^10541 
20129 MILANO Wll 
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A Burroughs Company 
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COMMODORE 64 - C 128 

Turfaotape sonoro 

Digitate questo semplice programma e il 
vostro registratore non sarà più... muto! 


1 1 turbotape è un programma di utilità 
quasi indispensabile per ogni possessore 
di Commodore f>4 perchè permette di 
salvare, caricare e verificare programmi 
su nastro in modo assai più veloce che 
con i normali comandi SAVE, LOÀD, 
VERIFY nsparm landò tempo e nastro. 

Questo programma è piuttosto diffuso 
c la rivista su nastro della Systems Edito- 
ria le (Software Club) ne fa spesso uso 
per registrare i programmi. 

E' possibile renderlo ancora più versa- 
tile e noi di Commodore Computer Club 
ci siamo permessi di aggiungere, ai co- 
mandi già disponìbili (<— S, < — L, <— 
V), un nuovo comando che consente di 
“ascoltare'* il rumore dei programmi du- 
rante la fase di caricamento degli stessi. 

E 1 ovvio che, prima di digitare il lista- 
to, è necessario caricare e attivare il tur- 
botape perchè il nuovo comando (che si 
impartisce con < — P) non funziona sen- 
za la presenza degli altri tre. 

Dopo aver digitato il listato pubblicato 
su queste pagine, potrete salvarlo anche 
con < — $ e t per utilizzarlo in seguito, 
ricaricarlo col solito < — L e abilitare il 
comando < — Pcon RUN. 

Come usare il comando < — P 

Dopo aver digitato il tasto di freccia a 
sinistra, il carattere "P*’e battuto il tasto 
Return, appare sullo schermo il consue- 
to messaggio: PRESS PLAY ON TAPE. 

A questo punto, premendo il tasto 
PLAY del registratore, lo schermo di- 
venterà del colore del bordo e potrete 
sentire duìl audio del vostro apparecchio 
Tv il rumore dei programmi salvati sulla 
cassetta. 

Per ritornare al Basic è sufficiente pre- 
mere i tasti Kun/Stope Restore. 


di Carlo e Lorenzo Burazzeilu 
A. che serve il nuovo comando? 

Il comando < — P serve, come già det- 
to, per sentire i suoni prodotti dai pro- 
grammi registrati su cassetta. Quando, 
infatti, un programma viene registrato 
tramite <— $ oppure SAVE, viene dap- 
prima registrata una parte iniziale con il 
nome del programma e altri segnali perii 
sincronismo e, s ucce ssi vame rite, i dati 
del programma stesso. 

Ascoltando la parte iniziale, sentire- 
mo un sìbilo nitido mentre, quando il 
nastro passerà sulla sezione dati, si udrà 
un rumore confuso. 

Il nuovo comando, quindi, si rivela 
utile per la ricerca dei programmi salvati 
su cassetta qualora non si sapesse il pun- 
to preciso in cui questi iniziano. 

Facendo scorrere il nastro con i tasti 
Rewind e F.FWD e premendo poi il ta- 
sto Play potremo capire dal suono se sia- 
mo capitati sulla parte iniziale di un pro- 
gramma (sibilo) oppure no (rumore 
confuso). 

Nel primo casti dobbiamo premere il 
tasto Stop de! registratore, ì tasti Run/ 
stopt restore e battere il comando < -L 
per caricare il programma. Nel secondo 
caso, al contrario, dobbiamo continuare 
la ricerca. Questa funzione potrebbe, 
con minore comodità, essere svolta da un 
normale registratore dotato di altopar- 
lante (sempre che lo si abbia a portata dì 
mano). 

Inoltre per quei programmi con pro- 
blemi di caricamento si può agire nel mo- 
do seguente: una volta riscontrato il fati- 
dico messaggio dì LGAD ERROR si 
riavvolgerà la cassetta all'inizio del pro- 


gramma e si batterà il comando < — P per 
sentire il sibilo iniziale. 

Se noteremo che questo non è molto 
nitido, agiremo con un cacciavite sulla 
vite di regolazione deH’azimuth finché il 
sibilo sarà perfettamente putito. In se- 
guito potremo premere Run/stop e Re- 
ttore e il comando < — L per caricare 
normalmente il programma: 

Probabilmente dovrete fare queste 
operazioni più volte perchè il sibilo dura 
solo un paio di giri e non riuscirete quasi 
mai a “sintonizzarvi 71 bene al primo 
colpo. 

Infine il comando <— P può essere 
usato per sapere se un programma è stato 
salvato con SAVE (normale sintassi 
Commodore) oppure con <— S (sintassi 
T/T), Infatti il sibilo di un programma 
salvato con SA VE è meno acuto di uno 
salvato con <— S e il rumore del pro- 
gramma è meno confuso. 


IBS 

REM 
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i®3 

ktn 
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104 

h 


no 

REM 
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ns 
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114 

•i 


tao 
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IL REGISTRATORE 

134 
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130 
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140 
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150 
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-O AND B<£55 TK£N 19® 

170 

r 
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130 
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DATA 
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END 
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Oa oir»i c’è un nuovo 
distributore di 
stampanti FACM 

per il tuo 

Personal Computer IBM 




Agenzie FÀCTT 

Arenzano (GÈ) %, Castetfucci & C P.za degli Ulivi* 15 
Tel,: 010/9112036 - Bergamo 01. P, Brigamo Via Borgo 
Palazzo* 90 TeL: 035/233909 - Bologna D l.P. Bologna 
P.za Porta Masearelk, 7 TeL: 051/240602 - Castelfranco 
Veneto (TV) Kecom Borgo Treviso, 45 Tei.: 0423/496222 
Fabriano (ÀN) D.LP . Attentai Via G. Tumulasi, 15 
Tei: 0732/22259 - Milano D.UP. Milano Via A, Costa, ,33 
TeL: 02/2340508 2840488 - Roma 0J.P, Roma 
Via C Colombo, 179 TeL: 06/5133041 
- Torino Etcomin Via Artisti, 36 Lei.; 011/832620 

Distributori FÀCIT 
ILìssnnu del Grappa (VI) Studio L.Sc C Vie Diaz, 27 
TeL: 0424/212541 - Bassotto del Grappa (VI) Studio 
USc a Vìa Z. Bri cito, 27 TeL: 0424/29275 Big Luca, 
Sig. Venturini - Belluno SCP Computer System Via Fel- 
tre, 244 Lei.: 0437/20826 Sig. Costa Sig. Ree - Gorizia 
Quark Via Udine, 143 Tri: 0481/391693 Big. Cui in, 
Sig, Costa - Mestre (VE) Negozio: Via Verdi, 8/10 l ei.: 
041/962866 Big. Magai fichi - Mestre (VE) Show Room: 
P.za Basche. 45 TeL: 041/958007 Sig. Magnili chi - Me* 
sire (VE) Bo fieli ( (7 so del Popolo, 32/c Tel.: 

<►41/951 247-505781 2 
Dr. Roberto Conforto - 
Mestre Loc. Chirìgnugo 

(VE) Computifìié 
Via Mi rane se, 420 
Tei: 041/917566 - 
Padova System Ros 
P.za De GtLsperi, 14 



Td.: 049/38412 Big, Pasqualetto - Portici (NA) Sisa 
Via Canarde. 14 TeL: 081/7755158 lng. Di Maso - 
Roma Data Office Via Sicilia, 205 Tei.: 06/4742651 
Dr. i riulzi - Roma Expo Via ] V Novembre 
lei.: 06/6783488 Sig. Raffini - Roma Personal 
Computer P.za Pio XI, 26 Tel.: 06/6380353 
Dr, Lilippetti - Roma VMt Ade! P.za Bairnizm, 3 
Tel.: 06/316331-316676 lng. Paolo Tropea - S. Duna 
di Piave (VE) Dr. Spinazzè P.za Rizzo, 63 
TeL: 0421/52548 - San Gregorio di Culmi in (CI) 
Sistemi Sud Computer* Via Sgrop pillo, 17 - 
TeL: 095/493911 Sig. U Rosa - Schio (VI) Bit 
Via Roncoletio, 23 Tel : 0445/28928 Big. Bertoldi - 
Schio (VI) Linea 4 Via del Cristo TeL: 0445/28970 
Big. ZafTonato - Ta verri elle Alimi Un (VI) Centro 
Infortita fica Via Verona, 64 TeL: (H 44/573967 -8 
Big Todescan - Trevi»!» Informatica Tre Vie della 
Repubblica, 19 Tel.: 0422/65993 Sig Bn ignara - 
1 Vieste Ditta Munì Via A, Diaz, 24/ A IVI.: 040/306091 
Sig, Migliarini - Udine Michieìi Vfe Ungheria, 64 
Tel.; 0432/291835 Sig, Mi chicli - Verona Computek 
Sistemi V.ìe del Lavoro, 33 - TeL: 045/509311 
Big. Farina - Vicenza Alfa Data Via Milano. 1 10 
TeL: 0444/31865-46481 Stg. Dal Dosso 


Centro Dire/ CoDèoni 
Palazzo Orione Ingr. I 
20041 A grate Brian/u (MI) 
TeL; 039/6363331 
Telex; 326423 SIAV BC 
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Viaggio 

nelle “adventure 



99 


Immaginate di essere Indiana Jones e di 
trovarvi di fronte a una muta di lupi affamati 
mentre ia proverbiale principessa invoca il 

vostro aiuto. 


di Michele Maggi 
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i siamo recentemente occupati di 
uno dei piu famosi adventure, Zork r 
illustreremo questa volta la spiegazio- 
ne in dettaglio del funzionamento di un 
adventure, in modo da mettervi in grado 
di costruirne uno tutto vostro. 


Il primo passo 

Il primo passo verso la costruzione di 
un adventure è inventare una trama e 
stabilire il compito del protagonista ai» 
P interno del gioco. 

Per ragioni di spazio e, soprattutto, di 
chiarezza, nel Pad venture pubblicato qui 
di seguito sono stati evitati di proposito 
una trama (sceneggiatura) intricata o un 
compito difficile da portare a termine. 


Una volta inventata la trama e stabilito 

10 scopo ddPadventure, è la volta della 
descrizione dei luoghi da visitare e que- 
sta, sicuramente, è la parte più avvincen- 
te del gioco. 

Non c'è limite al numero di locazioni 
che possiamo inserire, ma, per il momen- 
to, converrà mantenerlo piuttosto basso 
per essere sicuri di comprendere a fondo 

11 funzionamento di un programma -tipo. 

In primo luogo bisogna disegnare un 
bozzetto raffigurante la disposizione del- 
le locazioni (che d’ora in poi chiameremo 
convenzionalmente stanze), come in fi- 
gura L 

Successivamente dovremo inserire la 
mappa scelta in una matrice di 5 quadrati 
per 5 , come in figura 2 . 






GIOCHI 



Solo tramite questa operazione sare- 
mo in grado di muovere) itelFadventure, 

Subito dopo numereremo i 25 quadra- 
ti in modo che ogni stanza sìa individuata 
da un numero ben preciso. 

Esempio; 

Riva del fiume = 1 
Sentiero — 2 
Caverna = 7 
Campo = 8 
Bosco = 9 
Prato = 13 

Resta sottinteso che i numeri dei qua- 
drati inutilizzati non verranno cosiderati 
nel corso del gioco. 

Quattro possi per r ad venture 

La formula che ci permetterà di spo- 
starci di stanza in stanza è dì una sempli- 
cità estrema. 

Assumendo che il punto di partenza 
sia la caverna (stanza n. 7), per andare a 
Nord dovremo sottrarre al numero della 
nostra stanza il numero dei quadrati che 
formano un lato della matrice, cioè; 

7-5-2 


Il numero 2, infatti, è il numero della 
stanza posto immediatamente aldi sopra 
(Nord) della caverna, cioè il sentiero. 

Analogamente, sommeremo» invece 
di sottrarre, per andare verso Sud. In tal 
modo se, nel corso del gioco, ci troviamo 
nel campo (stanza 8); sommando 8+5 
otteniamo 13, cioè il mimerò di stanza 
corrispondente al prato. 

Per andare a Est oppure a Ovest basterà 
semplicemente aggiungere o sottrarre 
uno, qualunque siano le dimensioni della 
matrice. 

. Per esempio, se ci troviamo nella ca- 
verna (stanza 7) e vogliamo andare a Est, 
la formula sarà la seguente: 

7+1=8 

cioè il campo, 

Semplice, vero? 

Quanto detto finora vale per una ma- 
trice di 5x5, ma nessuno ci impedisce di 
aumentare le dimensioni dell ‘ad venture 
per esempio a 10x10, purché nella for- 
mula venga inserito il valore 10 e non più 
5. 


Gli oggetti 

In ogni adventure esistono vari ogget- 
ti, soggetti a spostamenti, che danno agli 
adventure quel realismo che li caratteriz- 
za, In sostanza saremo in grado di pren- 
dere un oggetto in una stanza, deporlo in 
un’altra ed essere sicuri di ritrovarlo suc- 
cessivamente nello stesso punto in cui 
Fabbiamo lasciato. Il programma, in al- 
tre parole» *‘deve” ricordare il luogo in 
cui è stato abbandonato un qualsiasi 
oggetto. 

Dobbiamo» inoltre, avere il diritto di 
chiedere al programma, in qualsiasi mo- 
mento, di informarci sulla nostra dota- 
zione che si modifica di volta in volta, a 
seconda se abbandoniamo o prendiamo 
gli stessi oggetti, 

I pericoli 

Tutti gii ad venture* sono sempre stra- 
colmi di pericoli, mortali o meno, ma 
sempre indesiderati. 

Si scamperà da alcuni solo se in posses- 
so di determinati oggetti. 

Net gioco proposto, ad esempio, so- 
pravvivere te alle sabbie mobili solo se in 
possesso della frusta che ci permetterà di 
aggrapparci a un albero e potremo ucci- 
dere il lupo solo sparandogli con la pisto- 
la presa in precedenza, altrimenti. . 

I comandi 

Durante lo svolgimento del gioco ver- 
rà contìnuamente richiesto il da farsi e 
potremo rispondere indicando una dire- 
zione (N, S, E, O) o impartendo un co- 
mando vero e proprio relativo ad azioni 
più complesse come, ad esempio, pren- 
dere, gettare, uccidere e cosi vìa 

In riquadro a parte sono elencate tutte 
le parole chiave relative al gioco pubbli- 
cato, “Caccia al Lupo”. 

E" possibile insegnare al computer a 
distinguere, in una frase-comando, il 
verbo dal nome» assumendo che il primo 
comando sia il verbo e la parola successi- 
va all eventuale articolo, il nome (esem- 
pio: prendere la busta). 
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Prima di passare ad analizzare detta- 
gliatamente il programma ci soffermere- 
mo sulla trama proposta e T soprattutto, 
sulla strategia vincente. 

Caccia al lupo 

Il listato, come già detto, è un mi- 
croad venture senza nessuna pretesa, a 
parte quella di insegnare come si può 
realizzare un gioco di questo tipo. 


La trama 

La trama non può che essere banale, 
data la brevità del listato e quindi non c h è 
posto per vistosi colpi di scena. 

Vi trovate in un luogo desolato e avete 
il compito di trovare e uccidere un enor- 
me lupo che in passato ha fatto strage di 
uomini e animali. 

Avete chiaramente bisogno di armi, 
ma quale arma sarà in grado di uccidere 
un lupo cosi grosso? 

Muovendovi molto cautamente dove- 
te cercare la pistola che, purtroppo, ave- 
te perso per strada durante il viaggio di 
andata. 

Una volta trovata la pistola, potrete 
finalmente (se siete ancora vivi) uccidere 
il lupo. 

La strategia vincente 

Come detto prima, in questo adventu- 
re la strategia vincente È una sola. 

Dal punto di partenza, la caverna, vi 
muovete verso Est, quindi verso Sud e 
qui, nel prato, trovate una frusta che 
dovrete prendere (sempre che vogliate 
sopravvivere, s'intende). 

Poi tornate alla caverna e andate a 
Nord, ma,,, cadete nelle sabbie mobili! 

Cosa fare? Cercate di uscire e, come 
per incanto, con un'impresa degna di In- 
diana Jones vi troverete fuori dalle sab- 
bie mobili. 

Da qui ora andate a Ovest e arrivate in 
riva a un fiume e.., sorpresa T! E 1 proprio 


qui che avete perduto la vostra pistola 
Prendetela senza esitare e andate a cer- 
care il lupo perchè ora non avete più 
nulla da temere, 

Potete in qualsiasi momento chiedere 
aiuto semplicemente rispondendo '‘A" 
alla richiesta di istruzioni. 

E’ interessante notare come i consigli 
cambino in funzione della stanza in cui ci 
si trova. 

Provate, ad esempio, a chiedere aiuto 
quando siete nelle sabbie mobili o quan- 
do siete di fronte al lupo. 

Un'ultima osservazione prima di ana- 
lizzare il programma. 

Così come viene pubblicato, Tadven- 
tute si presenta piuttosto scarno e dò è 
dovuto alle descrizioni che fatalmente, 
per questioni di spazio, sono state ridotte 
al minimo. Ciò non toglie, però, die nei 
vostri ad venture possiate, anzi dobbiate 
inserire descrizioni molto più esaurienti 
e coinvolgenti. 


Il genere a cui si ispira I ad venture può 
essere q u automa i vario: fantascientifico, 
western, horror, giallo, thriller Non ci 
sono limiti se non quelli posti dalla vostra 
fantasia, 


Come funziona il programma 

10-40 inizia lizza no le variabili relative 
al numero (locazione) della stanza, ai 
nomi degli oggetti che vi sì troveranno e a 
una piccola descrizione degli stessi. 

50 setta la posizione iniziale nella stan- 
za (N.7), E T possibile cambiare a piaci- 
mento il valore di questa variabile; anzi, 
provate a cambiarlo in 13 e vedrete che, 
invece di partire dalla caverna, partirete 
dal prato, I più bravi potranno inserire 
una routine che randomizzi questo valo- 
re tutte le volle che inizia it gioco. 


Figura 2 
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60 assegna a P il valore dì P2 che rap- 
presenta la nuova posizione, 

70-90, in funzione del valore di P, 
mandano alla riga che ne contiene La de- 
scrizione corrispondente. 

Gli zeri hanno semplicemente lo scopo 
di far selezionare l'esatto numero di lìnea 
(vedere in dettaglio sul manuale dei vo- 
stro computer l'uso dell'Istruzione 
ON..GOTO). 

100-110 stampano La descrizione del- 
l'eventuale oggetto posto nella stessa 
stanza in cui si trova il giocatore. 

120 e 130 controllano se il giocatore si 
trova in una delle stanze contenenti i 
pericoli e descrivono il pericolo in 
questione. 

140-180 stampano le possibili uscite. 

19U richiede le istruzioni. 

200-210 hanno la stessa funzione delle 
linee 120-130, ma per impedire ì 
movimenti. 

220 controlla se la risposta è una 
direzione. 

240-270 spostano il giocatore facendo 
usti della formula descritta nelFarticolo. 

280 impedisce al giocatore di andare in 
una direzione non consentita^ 

290 impedisce dì muoversi in presenza 
dì pericolo, 

300 manda alla routine di stampa degli 
oggetti in possesso del giocatore. 

310 controlla se il giocatore é nelle 
sabbie mobilie se vuole uscire. 

320 predispone il messaggio di aiuto. 

330-420 separano il verbo dal nome e 
lo confrontano con le parole chiave. 

430-450 stampano la dotazione. 
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480-500 stampano il messaggio di aiuto 
in funzione della posizione del giocatore. 

510-590 controllano il possesso o meno 
degli oggetti e permettono di prenderli o 
di lasciarli. 

600 rimanda alla stampa delle direzio- 
ni possibili. 

610-620 controllano se il giocatore ha 
la frusta nei caso in cui sia capitato nelle 
sabbie mobili. 

640-670 controllano se il giocatore può 
uccidere il lupo. 

680-790 descrivono le stanze e ne sta- 
biliscono le uscite. 

800-920 routines di morte e di richiesta 
di ima nuova partita. 


Lista variabili 

SM — sabbie mobili, è settata a 2 quando 
il pericolo è scampato. 

LU = lupo, funziona come sopra, 

OG(I) = locazioni che inizialmente con- 
tengono gli oggetti. 

OGS(I) = nomi degli oggetti. 

ODS(I) — descrizioni degli oggetti, 

P = posizione. 

P2 — posizione successiva, 

N * contiene il numero di stanza che 
eventualmente si trova a NoTd della 
posizione. 

S = come sopra ma peT Sud, 

E = come sopra ma per Est, 

O — come sopra ma per Ovest 
IS = struzione. 

V$ = verbo. 

N$ = nome. 

D = dotazione, 

A = aiuto, 


A 

ParoJe chiave 
e comandi 

N = Nord, 

S = Sud. 

E = Est. 

O “ QvEst, 

A 

Abbandonare 

Afferrare 

Ammazzare 

Buttare 

Gettare 

Lasciare 

Prendere 

Sparare 

Uccidere 

Uscire 

A 

D = Dotazione 
A = Aiuto 

A 

N.B* Per ciò che riguarda i verbi, il 
programma è predisposto per accet- 
tarli solo all'infinito, come se fosse 
sottinteso "Io voglio". 

E' assunto che quando si è davanti al 
lupo se si scrive “uccidere*' o "spara- 
re", sìa sottintese) "al lupo 1 *. Perciò 
una frase tipo "uccidere il lupo" avrà 
lo stesso effetto dì “uccidere il mo- 
stro'* o di “uccidere il 
program rnatore ’ T . 

Il risultato sarà comunque l’ucci- 
sione del lupo, purché siate in pos- 
sesso della pistola. 

A 
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REM CACCIA AL LUPO 

* 

REH ADUENTURE PER 

REM QUALSIASI COMMODORE 

* 

* 

REH DI MICHELE MAGGI 

<9 

* 

PRINTCHRSC1473 :SM-0:LU-0: FD 
R 1-1 TG 3; READ OGCI3,OGSCI 
3 , 00$ C l 3 : NEXT 

DATA 7, IL COLTELLO, PER TER 
RA C J E ’ UN COLTELLO 
DATA 1 , LA PISTOLA, DUI C’E’ 
LA TUA PISTOLA. 

DATA 13, LA FRUSTA, A TERRA C 
’E’ UNA LUNGA FRUSTA 
P-7 : GOTO 70 
P-P2 

IF F<11 THEN ON PGOTO GB0.7 
00,0,0,0,0, 720 , 740 , 780 , 0 
IF F<21 THEN ON P-10GOTO 0, 
0 , 760 ,0,0, 0,0, 0,0,0 
IF POE THEN ON P-20GDTO 0, 

0 , 0 , 0,0 

FOR 1-1 TO 3 : I F QGCD-P THE 
N PRINTDDSCI) 

NEXT 

IF P-2 AND ' 5M< > 2 THEN 800 
IF P-9 AND LU < > 3 THEN 010 
PRINTCHRSC 173 "PUOI ANDARE"C 
HRSC173 

IF N>0 THEN PRINT” A NORD" 
IF S>0 THEN PRINT” A SUD” 

IF E>0 THEN PRINT" A EST” 

IF O>0 THEN PRINT” A DUEST" 
1$-"”: INPUT ”C2 DOWND ISTRUZ 
IONI II: PRINT’OCLEART” 

IF P-2 AND SM<> 2 THEN 2S0 
IF P-9 AND LU<>2 THEN 2S0 
IF I$-”N” OR IS-"S” OR II-” 
E” OR IS-”0” THEN 240 
GOTO 300 

IF I S— ’’ N ” AND N>0 THEN P2-P 
-5: GOTO S0 

IF IS-”S" AND S>0 THEN P2-P 
+5; GOTO 60 

IF IS-”E” AND E>0 THEN P2-P 
+ 1 : GOTO 50 

IF I$-”0” AND D>0 THEN P2-P 


“1 : GDTD 60 

280 PR INTCHRIC 173 ”NDN PUOI ANDA 
RE A " ; I S : GOTO 70 
280 IF II- ”N ” OR II- "5” OR II-” 
E” OR THEN PRINT "NON 

PUOI FARLO ADESSO ! ! ! ” :QDT 
0 70 

300 IF I I* "D ” THEN 430 
310 IF IS-”USCIRE” AND P-2 AND 
SM<>2 THEN 610 
320 IF II-”A” THEN 480 
330 FOR 1-1 TO LENC IS3 : IF MIDSC 
18,1,13—” ” THEN 360 
340 NEXT 

350 PRINT "USARE PIU’ PAROLE. ”:G 
□TO 70 

360 FOR SX-1 TD LENCIS3: IF MIO 
$CI$,SX,13-" ” THEN 380 
370 NEXT 

3B0 US-LEFTSC IS.SX-13 :N$-RIGHT$ 
C 1$, CLENC I83-SX3 3 
330 IF U8- "PRENDERE” OR U$-”AFF 
ERRARE” THEN 510 
H00 IF US-”GETTARE” OR U$-”BUTT 
ARE” OR US- "LASCI ARE” OR US 
-"ABBANDONARE” THEN 560 
410 IF US- ”UCC I DERE ” OR U$~”AMM 
AZZARE ” OR US- "SPARARE” THE 
N 630 

420 PR I NT ” E DOWN 3 NON SO COSA UUO 
L DIRE CRUS3 ” ; US: GOTO 70 
430 PRINT”CCLEAR3LA TUA DOTAZIO 
NE E ’ CDOWN3 “ : D-0 
440 FOR 1-1 TQ 3 : IF OGCI3 — 1 TH 
EN PRINTQGK I 3 : D-D+l 
450 NEXT 

460 IF D-0 THEN PRINT”NULLA . ” 
470 GOTO 70 

4B0 IF P-3 THEN PRINT”FROUA A 
D UCCIDERLO GOTO 70 
490 IF P-2 THEN PRINT”PROUA AD 
USCIRE . . . ” : GOTO 70 
500 PRINT "NON HAI BISOGNO DI AI 
UTO QUI . ”:GOTO 70 
510 FOR 1-1 TO 3: IF OGSC I 3-NS T 
HEN 530 
520 NEXT 

530 IF OGCI3 — 1 THEN PRINT”CE L 
■HAI GIÀ’ . ” : GOTO 70 
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5 40 IF OGCDOP THEN PRI NT "DUI 
NON C’E’ ” ; NS : GOTO 70 
550 PRINT "UÀ BENE, HAI PRESO ”0 
G$< I i : OGC I )--l : GOTO 70 
560 FOR 1-1 IO 3 : I F OGSCD-NS T 
HEN 5B0 
570 NEXT 

5B0 IF OSCno-1 THEN PRINT”NDN 
L’HAI. "iGOTO 70 

5S0 PR I NT ”UA BENE, HAI GETTATO 
”0G$ CI): OGC I 3 ”P : GOTO 70 
600 GOTO 140 

610 IF OGC3) — 1 THEN PRINf’OK, 
CON LA FRUSTA TI AGGRAPPI A 
UN RAMO . " : SM-2 : GOTO 70 

620 PR I NT "NON HAI NULLA A CUI A 
□GRAPPARTI GOTO 900 

630 IF P 09 THEN 670 
640 IF 0GC2) — 1 THEN PR I NT ”DK , 
L’HAI UCCISO ! ! HAI UINTD L 
A SFIDA . ” :GOTO B50 

650 IF OGC1D--1 THEN PRINT"CON 
QUEL TEMPERINO ? UUOI SCHE 
R2ARE ! ! " : GOTO 020 
660 PRINT”NCN HAI NULLA CON CUI 
UCCIDERLO”: GOTO 820 

670 PR I NT ”QU 1 NON C’E’ NESSUNO 
□A UCCIDERE . ”:GDTD 70 
680 PR I NT ”t 2 DOWN] SEI IN RIGA A 
D UN FIUME” 

690 N-0: E-2: S-0: 0-0: GOTO 100 
700 PR I NT’’C 8 DOWN! SE I SU UN SEN 
TI ERO FANGOSO” 

710 N-0: E-0: S-7: 0-1: GOTO 100 


720 PRINT’T2 D0WN1SEI IN UNA CA 
UERNA CON DUE USCITE" 

730 N-2:£-B: S-0: 0-0: GOTO 100 
740 PRINT’T2 DOWNUSEI IN UN CAM 
PO DELIMITATO DA UN BOSCO" 
750 N-0: E-S;5-13: 0-7: GOTO 100 
760 PRINT’’Ce 00WN1SEI IN UN FRA 
TO” 

770 N-B: E-0: S-0: 0-0: GOTO 100 
780 PR I NT ’’ C 2 D0WN1SEI UICINO A 
UN BOSCO” 

790 N-0 : E-0: S-0 :0-B: GOTO 100 
800 PR 1 NT ”SE I. CADUTO NELLE SABB 
IE MOBILI”: GOTO 1S0 
810 PRI NT”UN ENORME LUPO ESCE □ 
AL BOSCO.”: GOTO 130 
B20 PRINT ”CDOWNJ IL LUPO AUANZA 
LENTAMENTE UER5C DI TE.” 

830 PRINT ”TU CERCHI DI SCAPPARE 
MA INUTILMENTE," 

840 PR I NT” I L LUPO TI RAGGIUNGE 
E TI DIUQRA ..." : FRI NT ”C 2 DO 
UN] GNAM GNAM” 

850 FOR T-l TO 3000: NEXT 
0S0 PRINT “CDOUNl GIOCHI ANCO 
RA C5/N5” 

070 GET A$ : I F A$-”” THEN 070 
080 IF A$-”S” THEN RUN 
890 END 

900 PRINT” IL FANGO TI ATTIRA SE 
MPRE PIU' GIU’,” 

910 PRI NT "TI RIEMPIE LA BOCCA E 
TU NON PUOI PIU’” 

920 PRINT”RESPIRARE ... MI DISP 
I ACE.”: GOTO 050 
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Una 

stampante 

tuttofare 


La stampante a 
colori Okimate 20 è 
stata provata 
simulando 
ambienti ” d'uso tra 

■L 

/' più disparati. I 
risultati sono 
convincenti: eccoli. 


u 


di Alessandro d# Simon* 



vederla così piccola e leggera 
(etn 33x 1 9x6 e peso nettamente 
inferiore ai 3 Kg), viene subito in 
mente di classificare Okimate 20 
tra i prodotti di utilizzo esclusi- 
vamente amatoriale. 

Imparando a usarla, al contra- 
rio, non si può fare a meno di 
immaginarne Fuso in tutte quelle 
occasioni in cui la “solita" stam- 
pante non soddisfa pienamente. 
Ma, bando alle chiacchiere, esa- 
miniamo i lati positivi del pro- 
dotto. 

* Collegabile direttamente (senza, 
cioè, interfaccia di alcun tipo) al 
vostro Commodore (Vie 20, 
C-16, Plus/4, C-64, C-128) me- 
diante il solo cavo seriale, 

* Totalmente compatibile con il 
“protocollo’' standard Commo- 
dore (vedi, infatti, il listato dimo- 


strativo di queste pagine e il cor- 
rispondente Output). 

* In unione col word processor 
“Easy Sript" (con cui è stato rea- 
lizzato il presente articolo) fun- 
ziona perfettamente. 

* In unione con programmi “dif- 
ficili” (come il Frinì Shop) fun- 
ziona in modo ineccepibile, di- 
mostrando che è possibile “scari- 
care” pagine in alta risoluzione, 
realizzate nei modi più diversi, 
senza alcun problema, 

* I! dischetto presente nella con- 
fezione consente di riportare su 
stampante (in 16 colori oppure 
in cinque tonalità, dal bianco al 
nero) disegni eseguiti con uno dei 
seguenti programmi grafici, ben 
noti alla maggior parte dei nostri 
lettori: Doodle, Koala, Edumate, 
Super sketch, Flexidraw, Paint 
magic, Calkboard, Sorcerer’s 



Apprentice, Blazing paddles. Un 
menu permette la scelta, la ricer- 
ca e la stampa de] file-disegno. 

* Massima silenziosità dovuta alla 
testina termica di cui è dotata la 
stampante. 

* Possibilità d'uso di carta norma- 
le, carta con superficie speciale 
lucida (per le migliori prestazio- 
ni), in rulli o in pacchi perforati, 
carta termica (da usare rimuoven- 
do il nastro, che risulta in questo 
caso del tutto inutile), carta luci- 
da (per disegni tecnici) e, grande 
novità, supporto in acetato, da u- 
tilizzare con le lavagne luminose, 

* Il nastro, nero o a colori, garan- 
tisce una qualità di riproduzione 
molto buona (validissima per ot- 
tenere fotocopie di documenti di 
qualità e nelle protezioni con la- 
vagne luminose) perchè è del tipo 
che si utilizza una sola volta, si- 
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nule a quelli in dotazione a mac- 
chine da scrivere di qualità eleva- 
ta. Durata dei nastro: 120mila 
caratteri ( b • n ), 3 5 mila a colori. 
La stampante, usata in b/n con 
carta termica, non richiede, ov- 
viamente, l'inserimento della car- 
tuccia inchiostrata. 

* Velocità accettabile (40, 60, 80 
c,p,s. a seconda del modo d'uso), 

* Matrice 1 4x l 4 oppure 7x14 (al- 
ta qualità oppure alta velocità), 

* Ire tipi di stampa (Pica, Elite, 
Condensato), 

* Riproduzione di formule mate- 
matiche, anche con potenze e in- 
dici (vedi listato) 

* Programmabili! à compieta dei 
caratteri definiti dal Putente, 

A chi può servire 

La stampante a colori Clama- 
te 20 è, anzitutto, una stampante 


“comoda". Troppo spesso sono 
state viste in giro stampanti a co- 
lori (e anche b/n) che, pur se in 
grado (in teoria) dì riportare vi- 
ci cale in alta risoluzione, in prati- 
ca abbandonavano Fu lente al suo 
destino, confortandolo solo con 
un paio di pagine di istruzioni 
(poco chiare) su come realizzare 
le hard copy. 

La Ottimate 20, invece, può 
essere usata da un principiante 
che non sa nulla di programma- 
zione: gli basterà caricare il di- 
schetto in dotazione e, una volta 
lanciato il programma, inserire il 
proprio dischetto su cui sono me- 
morizzati i file-disegni che inten- 
de riprodurre, 

A parte la soddisfazione di ve- 
dere su carta (anche a colori! ) i 
disegni realizzati con tanta fatica. 


non dobbiamo trascurare la pos- 
sibilità di effettuare copie su sup- 
porto di acetato, necessario per 
utilizzare le lavagne luminose. 

Indispensabile, proprio per 
questVltima opportunità, anche 
in scuole e aziende, la Okimatc 
20 può sostituire il plot ter «et ca- 
si in cui non sia disponibili del 
software in grado di 1 "scaricare” 
schermate realizzate in aha riso- 
luzione. 

Per ulteriori informazioni j 
lettori sono pregati di rivolgersi 
direttamente allhmportatore: 


Tcchnitron 

Via Milanofiori, PaL E/ 2 
20094 Assago (Mi) 

Tel, 02/824 2112 
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I OO rem programma ri i mosl ra L i uo che evidenzia 

Ito rem le caratteristiche della stampante FIGURA 1 

1 20 rem o k i m a t e - 20 ” 

150 ; 

1 40 operi 1,4,7 
1 50 rem 1 - n. fi Ir 

100 rem 4 = ri . per i fer iea f stampante 3 

170 rem 7* ean . second t C ma ì usnolo/i i riunico I o ) 

1 BO r*»chr*( 13 ì : rerr rigo vuoto 

100 printst, "PROVA SULLA STAMPANTE A COLORI OKI^ATE-20 per sistemi COMMODORE 1 
200 for i = 1 to65 : pr io t# 1 T '* - N ; :neKt:printsl : pr 1 nt »! 

210 |ir inni , "Questa e" una stampa nurmale'Vt 

220 print»! ,chr*( l4i h chrt( Hi raddoppia i CARATTFRT 'r® 

250 pr i nt ff 1 , chrK I 5 ) *chr*( 1 5 ) ritorna alla larghezza normale" r$ 

240 pr int«l ,chr*( IBI " chrsi 181 attiva il RE VERSE IDEE “r* 

250 print*1 ,chr*( 145) ,p chrs( 1451 attiva maiuscolo e graf icp : ABCDE>abcde " rs 
260 pr ì nt T 1 , “chr ¥( 27 ) corrisponde a] comodo: ESC M r* 

270 pr i nt JM , chr*( 27 lchr*(67 ì " ESC + 67 e' il comando delia sot tol insatura 11 r* 

200 pr i nt Jf 1 . chrst 27 ) chrst GB ) "ESC+Gfì c f il comando che la i ivUrroripe w r* 

290 print^l , "Esempio si formula ma temat ita Ét rs 
300 printff1. H X con 7 e lev. al la decima M ; 

310 pr int#1 F "piu' X con 4 per V elevato a f ,h ; 

320 prìnt#1 t "H piu 1 R) meno X M 

330 pr i nta 1 T H e 1 evalo alla J piu' Vi^rs 

340 giuiichrs(27) +chr *< 76 ) ■ su« = chr* (27 1 +chr*f 74 ) 

350 pr i n t#1 , 1 X " g i c * *7 H su* ; su* * 1 0 " g i u* ; 

360 printJl."+ X "g à li* "4 "sui" * V " su* w f H+R r p g in*" - X"su» " f J+V ? " r$ 

370 pr ì nt ffl . g iu* "R a torno alla stampa norma 1 c h r* 

3fìO pr int*1 . "Caratteri speciali per la stampa: chr*! XI ^rs 

390 pr in t * 1 , chr* ( 30 1 ”CHR*i 30 ? per scrivere con caratteri P l CA ° r * 

400 pnnttl ,chr*f 14? "(30+14) caratteri PICA al largai ì “ r* 

410 prmtll , chr*( 2B> PP CHR*( 2B ? per scrivere in ELITE M7 c.p.pJ’rs 
420 pr muri ,chr£M4 ) Él E 28+14 > caratteri ELITE al 1 acgal i ip r$ 

430 pr intJf 1 ,c:hr*(29) "CHRsE 29 ) per scrivere CONDENSATO 112 c.p.p.)*r* 

440 print*l ,chr*( 14) ”{29+14) caratteri in CONDENSATO al largati "r* 

4s50 printer h chr* I 15' "Con CHR&{ 15? si ritorna la modo di stampa PIGA lp r* 

4 60 printfll , "Esempi di caratteri serigrafici COmiiQDORE : H 

4 70 pr i nt# 1 , eh ri ( 145 > "a 1 f abeto ; aA b0 cC dD cE f F gG hH il jj kK IL" 

4B0 pr in tff 1 , chr* ( 1 45 1 d, m^ nN oO pP qO rR sS tT ut' vV wW xH yY zZ" 

490 closel 

(tu* * L* ùm, 

ready . I - \ 
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PERIFERICHE 


FIGURA 2 



PROVA SULLA STAMPANTE A COLORI OKIMATE-20 per sistemi COMMODORE 


Questa e 1 una stampa normale 

± CARATTE1R I 
chrSflS) ritorna alla larghezza normale 

CHR$(145) ATTIVA MAIUSCOLO E GRAFICO:*! = ABCDE 

chr$(27) corrisponde al comado:ESC 
ESC +6 7 e h il comando della sottolineatura 
ESC+68 e 1 il comando che la interrompe 
Esempio si formula matematica 

X con 7 elev.al la decima piu' X con 4 per Y elevato a (H piu’ R) 
meno X elevato alla J piu' Y. 

X, r * + X, * Y* ’ -X f J * v ' 

Ritorno alla stampa normale 

Caratteri speciali per la stampa: chr$CX) 

CHRs f 30 1 per scrivere con caratteri PICA 

cara t. t_ x i P> J 0/\ ri 1 1 & t. i 

CHRsf 28) per scrìvere in ELITE (17 c*p.p. ) 

(2a+1<1) car'atter'i ELITE allargati 
MS (29) per scrivere CONDENSATO C12 c.p.pj 

(29+145 caratteri in CONDENSATO allargati 

Con CHRs( 15) si ritorna la modo di stampa PICA 

Esempi di caratteri semigraficì COMMODORE: 

ALFABETO : A* B C~ D~ E~ F- G H I -, J v- K J LL_ 

Mv N/ OH p“t Q# R_ s* T U VX WO X* V Z# 
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OLTRE IL BASIC 


QUALSIASI COMPUTER 



l' ra i messaggi (Terrore che il Basic 

Commodore può inviare ai suoi utenti, 
uno dei più fastidiosi è ILLEGAL 
DIRECT, 

Questo articolo spiega sia le sue moti' 
vazioni sia un trucco per evitarlo. 

La trattazione è riferita a VIC-20 e C 64, 
ma sono descritte anche le (minime) va- 
rianti per 016 e Plus/4, Perfino i posses- 
sori dei PET potranno seguire il discorso 
sostituendo ovunque le memorie 57 e 58 
con le 54 e 55, 

Che cosa sto facendo? 

Nello svolgimento dei suoi compiti 
l’interprete Basic ha spesso la necessità 
di interrogarsi sulToperazione attual- 
mente in corso. Ad esempio, quando in- 
contra il codice 133, “tokerf' (cioè sim- 
bolo) del comando INPUT, deve dappri- 
ma verificare se sta eseguendo una linea 
di programma (e in tal caso il comando 
sarà eseguito) o se il comando stesso è 
stalo inserito in un comando diretto (e 
allora verrà emesso il messaggio 'MULE- 
GAL DIRECT), 

Provate, infatti, a digitare diret- 
tamente: 


Due 

memorie 

molto, 

molto 

strane 

di Claudio Baiocchi 

INPUT A 

e a premere il tasto Retum. 

Sorgono spontanee tre questioni. 


• come fa il computer a sapere se sta 
elaborando una linea di programma op- 
pure un comando diretto? 

• Perchè i progettisti Commodore han- 
no previsto il divieto, in fase diretta, di 
eseguire alcuni comandi? Oltre a INPUT 
sono infatti rifiutati anche INPUT # . 
GET, DEF FN ( Su Otti e Plus/4 anche 
TRAP, RÉSUMÉ, e GET e GET- 
KEY sono rifiutati come caso particolare 
di GET. 

• E’ possibile svincolarsi da tali 
restrizioni? 

Una risposta affermativa alla terza do- 
manda può essere particolarmente utile 
nel caso di errore in un programma che 
prevede l’accesso al disco. Quando la 
spia del drive comincia a lampeggiare, 
occorrerebbe interrogare il canale 15. 
Se, prevedendo guai, abbiamo inserito 
net programma linee di help come le 
seguenti: 


Un’occasione unica 
per approfondire 
alcune nozioni 
riguardanti due 
puntatori 
fondamentali del 
Basic... e altre cose 
ancora. 


ÌOOOCLOSE 15:OPENl5 t 8, 15 
1010 INPUT % 15,A,B$,C,D 
11120 CLOSE15 : PRINT A ,B$,C ,D 

basterà fare: GOTO 1000, 
ì possessori di C- 16 e P!us/4 ottengono 
le stessei in formazioni digitando sempli- 
cemente PRINT DSS* 

Tuttavia spesso si ha troppa fiducia nei 
propri programmi, non si prevedono er- 
rori e non si predispongono linee di help, 
ed è chiaro che, se si digita il minilistato 
proposto a guaio avvenuto, si perdono 
tutti i dati elaborati fino a quel momen- 
to, Mentre» provando a eseguire in for- 
ma diretta i vari comandi, si otterrà solo 
un 7ILLEGAL DIRECT,., 


1 locazioni 57 e 58 

Per dare una (parziale) risposta alla 
prima domanda basta leggere in ROM le 
routine LM (linguaggio macchina) che 
gestiscono i comandi proibiti. 

Sui Vie 20 Iurte iniziano con un JSR 
$D3A6; sul C-64 con JSR SB3A6. Per 
C-I6 e Plus/4 si veda più avanti. 

Chi è digiuno di linguaggio Assem- 
bler, dovrà solo tener presente che l'i- 
struzione JSR è ^equivalente del GO- 
SUB in Basic, All’ indirizzo in questione 
troviamo poi le istruzioni descritte /tra- 
dotte e commentate in riquadro 1. 
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A$=“":POKE57.(l:POKE58,4: 

JNPUTASiPRINTAJSTOP 

Uhi ha il t'' 16 oppure il Plus/4 dovrà 
aggiungere la Poke relativa alta locazin- 
ne 129, cioè: 

AS= ”:POKE57 + ():FOKE5M:POKE 
129 t 128: 1 N PUTA$ rPR JNTAS :STOP 

Premendo il tasto Return, a conferma 
dell avvenuto inganno, vedremo appari* 
re il punto di domanda (7), rappreseti 
tante la richiesta di Input 

I guai che possono avvenire fornendo 
un A$ troppo lungo sono descritti nel 
riquadro 2. Per ora limitiamoci a consta 
tareiche, fornendo in risposta un A$ 
ll cono'\ tutto funziona regolarmen- 
te (?): il dato viene accettato (input), 
stampato (Print) e seguito da un 
BREAIL IN 1024 


Pur senza conoscere il meccanismo col 
quale l’interprete Basic gestisce la loca- 
zione 5H, possiamo comunque formulare 
una regola importante; 

Regala n + 1 

La fase di esecuzione di comandi diret- 
ti è caratterizzata dalla validità della 
relazione: 

PEEK(58)«255 


Su C- 16 e Plus/4, oltre alla relazione 
vista, si ha anche PEEK(I29>=Q ed è su 
quest' ultima locazione che viene effet- 
tuato il controllo. 

Sempre il contenuto della locazione 
129 è responsabile del messaggio '/DI- 
RECT MODE ONLY emesso quando, 
nel l'eia boranone di un programma, è in- 
contrato un RENUMBER, un DELE- 
TE oppure un AUTO. 

Proviamo ora a fare i primi tentativi di 
“truffa’ 1 airinterprete riferendoci d'ora 
in poi a Vie 20 e C-64 Le varianti do- 
vrebbero essere ovvie: digitiamo, tutto 
di seguito, su uno stesso rigo: 


Si digiti, tuttodì seguito e senza spazi intermedi: 

A$=“ ^:POKE57 t O:POKE58 T 4;lNPUTAJ:PRINTA|:STOP 
e si prema Return, Le POKE iniziati fanno ritenere all intei prete di stare 
elaborando la linea Basic 1H24, e non un comando diretto. Pertanto la 
richiesta dì input è eseguila. 

FORNENDO COME At: 

SI OTTIENE: 

una stringa con 

LEN(AS)<19 

AS è accettato e stampato 
segue BREAK IN 1024 

la stringa di 19 caratteri 
ABCDEFGHUKLMNOPQRS 

A$ non è accettato: segue 

7SYNTAX ERROR IN 1024 

la stri nga di 20 caratteri 
ABCDEFGH I JK LMNOPQRST 

A$ non t accettato; segue 
?REDO PROM START, poi 

7SYNTAX ERROR IN 1024 

la stringa di 21 caratteri 
ABCDEFGHIJKLMNOPQRSTt 

resta AS—"”. La stringa 
digitata È immessa, 
stranamente, inT$ 
segue BREAK IN 14884 

Sul Vie 20 c C -64. Per le varianti relative a C-16 e Plus/4, si veda L’articolo. 

Riquadro 2 - L interprete, imbrodiate reagisce in modo strano 


Assembler 

Sem (-traduzione Basic 

SD3A6 LDXS3A 

X=PEEK(58) 

SD3A8 INX 

X = X+1 

SD3A9BNESD3B4 

IFX^256THEN RETURN 

SD3AB LDX-tt $15 

X=21 

SD3AD BITSIBA2 

(Vedi nota) ’ 

SD3B0 JMP Ec437 

GOTO ROUTINE ERRORE 

$D3B4 RTS 

RETURN 

La routine di errore stamperà il messaggio N.X che. ad esempio, per 
X=21. è 71LLEGAL DIRECT. 

Nota: la SD3ÀD è un trucco per risparmiare spazio: altrove in ROM con 

JMP SD3AE (oppure BNE $d3AE e simili) si otterrà l'effetto di: 

I.DX # $1H 

JMP IC437 


Riquadro t La mutino ROM che, sul Vie 20. vieta di usane, un forma diretta, alcuni comandi Sul 
C-64 lutti gli indirizzi! vanno diminuiti di $2000. Su G- 16 o Plus/4 la routine è un po diversa e usa la 

memona $81 anziché $3A. 
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Proviamo poi a modificare la linea pre- 
cederne scegliendo altri valori da pokare 
in 57 e 58: sempre con A$ corti, d accor- 
giamo che il numero che segue BREAK 
IN ha sempre la forma: 
PEEK{57)+256*PEEK(58) 

A complemento della regola 1 possia- 

mo perciò formulare la regola rt. 2. 

Regola n. 2 

Se è PEEK(58><255* l'interprete Basic 
ritiene di stare elaborando Sa linea Basic 
numero: 

P E E K(57 ) +256* REE K(S8 ) 

Si osservi che le due regole non sono in 
contrasto Ira loro: salvo operazioni... pi- 
ratesche delPutente. il numero di una 
linea Rasic vale al massimo 63999 
(=255 +256*249). In fase di elaborazio- 
ne di un programma sarà perciò sempre 
PEEK(58)<250. 

Un esame piu attento 

Gli 'strani"" comportamenti visti nel 
riquadro 2 indicano che, per dare una 
risposta efficiente al terzo quesito, oc- 
corre preliminarmente rispondere alla 
seconda domanda, La cosa non è diffici- 
le. ma richiede alcune premesse su cosa 
avviece quando digitiamo qualcosa e 
premiamo il tasto Return. Precisamente 
l'interprete esegue lei tre operazioni: 

* ricopia la frase nel buffer Basic (loca- 
zioni di memoria da 512 a 600); 

* terminata l'operazione aggiunge uno 
zero (0) a segnalare che il messaggio è 
finito (non c’è pericolo di confusione con 
la cifra * + 0": questa viene irascritta trami- 
te 48. suo codice ASCII); 

* soppressi eventuali spazi, o caratteri 
grafici iniziali, il contenuto del buffer 
viene "compresso”, sostituendo le paro- 
le chiave con i relativi coke il. 

L'operazione viene svolta “sul posto*', 
cioè il nuovo messaggio si sovrappone 
via via al messaggio già presente nel buf- 
fer che rappresenta, carattere per carat- 
tere, ciò che abbiamo realmente 
digitato. 

Non ci sono pericoli di sovrapposizioni 
perchè in qualsiasi caso il nuovo messag- 
gio è lungo al massimo quanto il prece- 


dente, Nd caso di comandi Basic, infatti, 
questi vengono tokenizzati c occupano 
quindi un minor numero di byte. Nd 
caso di caratteri alfanumerici privi di si- 
gnificato Basic, occuperanno lo stesso 
posto di prima. 

Quando si trova lo zero lo si trascrive; 
poi, saltata una casella, si scrive un altro 
0 il cui ruolo è analogo a quello della 
terna di zeri che chiude ogni programma 
Basic, 

Se PEEK(512)* cioè la prima locazio- 
ne de! buffer, è compreso tra 48 e 57, 
vuol dire che il messaggio digitato inizia 
con una cifra. Si deduce che Putente ha 
digitato una linea Basic, da modificale* 
sopprimere o creare ex- novo inserendola 
al posto giusto. In caso contrario, si trat- 
ta di comandi diretti* da eseguire 
immediatamente. 

Per rispondere alla seconda domanda, 
dunque, basta tener presente che* in oc- 
casione di INPUT, GET e simili* i dati in 
input transitano preliminarmente per il 
buffer Basic (a partire dalla cella 512* e 
terminanti con uno 0 finale) per la suc- 
cessiva elaborazione, 

E’ allora chiaro che* se INPUT esimili 
venissero accettati in un comando diret- 
to* i dati in input potrebbero “sporcare" 
il comando che U ha richiesti* sovrappo- 
nendosi ad esso nel buffer! 


Per Tesecuzione di DEF* invece* è ne- 
cessario tener presente che si prevede la 
memorizzazione* nella zona variabili, 
del punto di inizio della formula che defi- 
nisce la funzione. E' fin troppo ovvio che 
se tale formula è scritta solo nel buffer 
Basic* essa sarà resa inutilizzabile dai 
successivi comandi diretti. 

Conclusioni 

Volendo usare rn forma diretta uno 
dei comandi proibiti occorrerà* oltre alla 
modifica della locazione 58* o* della 129 
su C-I6e Plus/4, porre tale comando alla 
fine del buffer. 

Ad esempio, per colloquiare in forma 
diretta col canale 15 del disco* dopo un 
cautelativo: 

CLOSE15:OPEN15*8.15 
basterà digitare, tutto di fila, ricorrendo 
alle abbreviazioni note (DATA = Da; 
PRINT=7, eccetera): 

DATA “QUESTE POSIZIONI POS- 
SONO ESSERE SPORCATE”: PO- 
KE58.0: INPUT # !5.A.B$.C.D: 

PRINTA.BS.C.D 
e premere Return. 

Si osservi però che La risposta data alla 
prima domanda è ancora incompleta: le 
regole 1 e 2 ci dicono come il Commodo- 
re utilizza i contenuti delle locazioni 57 e 
58* ma non come fa a predisporre tali 
contenuti. 


Avendo in memoria il programma A, eseguendo RUN 30 oppure RUN 
40 si otterrà 7SYNTAX ERROR IN 40. Eseguendo invece RUN, RUN 10 
oppure RUN 20 si otterrà 7UNDEFD STATEMENT* seguito da ER- 
ROR IN 10, Eseguendo infine RUN 50 (oppure RUN 60, eccetera) si 
otterrà 7UNDEFD STATEMENT seguito solo da ERROR (senza nu- 
mero di linea dopo ERROR). 

| Programma B I 

11) REM 

20 POKE 57*10: GOTO 2tì 
30 POKE 57.40 ; PEEK 
40 GOTO 30 


Per quanto strano possa sembrare (in particolare nel caso di RUN 20) una 
diagnostica identica si ottiene avendo in memoria il programma B, 

Riquadro 3 - Manipolando >e locazioni 57 e se la diagnostica risulta Stravolta 


Programma A 

10 GOTO 60 
20 GOTO 10 
30 REM 
40 PEEK 
50 POKE 58*255; 
GOTO 60 
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HARDWARE 

COMMODORE 128 

80 colonne 
suU’apparecchio TV 

di Giancarlo Mariani 


Per sfruttare bene il 
Commodore 128 è 
sicuramente utile il 
monitor speciale 
RGB da 80 colonne 
che ha però un 
difetto notevole: 
occorre pagarlo. . . 



Sì, avete capito bene! Proprio 80 (ot- 
tanta) colonne su un normalissimo tele- 
visore domestico oppure* se lo possede- 
te, sui “solito” monitor monocromatico, 

A questo punto i lettori cominceranno 
ad arricciare il naso: “si tratterà della 
solita interfaccia multiuso e multi.,. prez- 
zo o, peggio, di un programma dalle dub- 
bie qualità in fatto di definizione dell'im- 
magine (vedi prodotti analoghi per Vic- 
20 e C-64)’\ 

Niente di tutto questo! Per visualizza- 
re le 80 colonne non è necessaria nessuna 
particolare (!) interfaccia, nè tantomeno 
un programma: bastano soltanto due fili 
elettrici e un qualsiasi modulatore Tv. 

Costo de ll’ope razione: praticamente 
nullo, calcolando che il modulatore si 


può recuperare da una vecchia console 
per video-giochi in disuso, oppure da un 
amico hobbysta elettronico. Al limite, si 
può utilizzare quello del Vìc-20 nel caso 
abbiate ancora il simpatico computer 
della Commodore che* dopo t'acquisto 
del C-128* avete forse dimenticato in 
cantina. 

A chi possiede un monitor non sarà 
neanche necessario il modulatore: ci si 
può Limitare ad acquistare soltanto un 
cavetto schermato e una presa Camion 
eguale, come piedinatura, a quella mon- 
tata sul joystick. 

Com*è possìbile visualizzare 80 colon- 
ne su una Tv se l'uscita del C-128 è addi- 
rittura RGB? C + è forse qualche 
inghippo? 


Ovviamente bisogna tener conto che 
la qualità deirimmagine non è delle mi- 
gliori e che, tra l'altro, non è possibile 
‘'uscire” a colori. Per il resto, però* non 
ritiriamo una parola di quanto afferma- 
to, Precisiamo comunque che questa non 
è una soluzione alternativa al monitor 
RGB* ma solo una soluzione provviso- 
ria, che permette tuttavia di usare decen- 
temente programmi sviluppati per Se 80 
colonne, in attesa dell’acquisto di un mo- 
nitor adeguato. 

Come realizzare il miracolo 

Veniamo alla descrizione delle opera- 
zioni da compiere.. 
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Figura 1 - Connessioni delia porta RGB C- i2a 
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visibili nelle figure di queste pagine. 


La “scoperta* che si sta per descrivere 
è avvenuta quasi per caso. Appena venu- 
ti in possesso del tanto desiderato C-128* 
ci è subito venuta voglia di provare il 
CPfM a 80 colonne e* non potendo prov- 
vedere anche all 'acquisto di un monitor 
RGB ci siamo messi ai lavoro per cercare 
una soluzione alternativa. 

L'idea è nata osservando attentamen- 
te la piedinatura della porta RGB (a pa- 
gina C-ó del manuale fornito col compu- 
ter). E' presente* infatti* uno strano con- 
tatto* indicato col termine 
u manochrome , \ 

Ci siamo affrettati a collegare questa 
uscita col modulatore del Vic-20 atten- 
dendo risultati positivi sulla Tv. Ed ecco 
che,., sorpresa! Non funzionava. Sul vi- 
deo si vedevano solo righe oblique che* 
in effetti* non erano altroché l’immagine 
priva dei sincronismi. 

Presi dalla disperazione e ormai quasi 
senza speranza, abbiamo provato a colle- 
gare* una per una, tutte le uscite della 
porta RGB col modulatore: a un certo 
punto è comparso sull "apparecchio il 
“prompt” delle 80 colonne del C-128. 

Il piedino incriminato è “horyzontal 
sync'\ sincronismo orizzontale e non 
chiedetemi perche funziona* ma 
funziona, 

Basta infatti prelevare il segnale tra 
quei contatto e la massa e poi ''sbatterlo’" 
tn un modulatore e quindi alla Tv. 

Pbr i possessori di un monitor* come 
detto prima* non sarà necessario il mo- 
dulatore: basterà infatti collegare diret- 
tamente l'uscita “horizontal sync 1 ' con 
l'entrata del monitor. 

Per chi non vuole fare la ‘"fatica” di 
cercare o acquistare un modulatore* ver- 
rà presentato su uno dei prossimi numeri 
uno schema elettrico di semplice realiz- 
zazione , adatto per qualsiasi tipo di tele- 
vtsore domestico e.. . per qualsiasi letto- 
re* anche se alle prime armi col 
saldatore. 

S .e connessioni d* effattuare sono ben 


Un 'avvertenza: non mandare alla Tvi 
due segnali (40 e 80 colonne) contempo- 
raneamente, perchè si disturberebbero 
l’un Taltro* L’ideale è usare un deviato- 
re * con il quale scegliere* a seconda delle 
esigenze* Tuno o l’altro sagriate. 

Per evitare interferenze si raccomanda 
l’uso di cavetti schermati del tipo televisi- 
vo. La qualità dell 'immagine (come det- 
to prima monocromatica* ossìa in bianco 
e nero anche su Tv a colori) non è pro- 


prio eccezionale e dipende comunque 
dai tipo di televisore utilizzato e dalla 
cotti bi naziona di colori sfondo/bordo 
selezionata. 

Gli effetti migliori si ottengono con 
televisori o monitor b/n di media gran- 
dezza (12-16 pollici) e con caratteri scuri 
su sfondo chiaro. T risultati ovviamente 
non sono assolutamente paragonabili a 
quelli fomiti da un monitor RGB ma* 
come dice il proverbio* chi si 
accontenta.,. 
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Chi ha ucciso 
Michael Jackson? 


di Antonio Visconti 


indossate i panni di 
Sherlock Holmes 
per risolvere un 
enigma degno del 
miglior autore di libri 
gialli... 



IT 

ii colpo d arma da fuoco riecheggia 
nell'aria. Nel corridoio, so cui affacciano 
t camerini degli artisti, giace il corpo sen- 
za vita di Michael Jackson. 

Qualcuno corre, ma non ù possibile 
vedere chi è Immediatamente tutte le 
uscite vengono bloccate, l’assassino nor 
può fuggire. 

Solo una tra sei persone può aver com- 
piuto Fintarne ciimine. Con un pressante 
interrogatorio bisogna scoprirla e in fret- 
ta: la stampa e l’opinione pubblica vo- 
gliono il colpevole. 

1/ interrogatorio 

C i deve essere un motivo per compiere 
uri omicidio. Una delle chiavi per risolve- 
re il caso È la ricerca di chi ha un moven- 
te, Non basta, ci vuole una pistola e biso- 
gna, ovviamente, trovarsi sul luogo del 
delitto. 

“Dove si trovava al momento dello 
sparo?” 

Reco una delle domande che anche il 
più sprovveduto investigatore pone al so- 
spetto che gli si trova davanti. 


Prendiamo nota delle risposte, abbia- 
mo trovato uno che odiava il morto (mo- 
vente), possiede una pistola (arma), ma 
era lontano da dove sono successi i fatti. 

Dobbiamo ricominciare daccapo, Pas- 
siamo una mano sulla nostra barba ispida 
(ci hanno svegliato alle quattro del matti- 
no, orario ideale per trasformare in caro- 
gna uno che se ne stava per i fatti suoi) e 
ricominciamo. 

Il colpevole è colui {colei) che ha mo- 
vente. arma e opportunità e solo in pre- 
senza di tutti e tre i requisiti possiamo 
formulare l’accusa con sicurezza e schiaf- 
fare Tassassi no dietro le sbarre. 

Continuiamo a fare domande: due de- 
gli interrogati hanno dato risposte con- 
traddittorie o forse siamo noi che alFalba 
non siamo ancora completamele svegli. 
Uno dei due è un bugiardo e alla fine 
glielo diremo in faccia, quella lurida fac- 
cia da topino sott'olio in vacanza. 

(N.B. Il linguaggio deve essere ade- 
guato al dima.) 

Dobbiamo interrogare un terzo testi- 
mone e se anche questo mente? Vorrem- 


mo mandare tutto al diavolo ed essere tra 
le lenzuola, ma la “lei” russa ed è meglio 
esser qui, in compagnia di un assassino 
sconosciuto, mondr> boia. 

Il caso 6 ingarbuglialo, ci vuole argu- 
zia, logica, spirito di osservazione e 
un "assicurazione sulla vita: quel figlio di 
koala (o si dice di cane?) può colpire 
ancora. 

Sappiamo soltanto che uno dei sospet- 
ti mente sempre, un altro solo qualche 
volta. Il bugiardo non è necessariamente 
il colpevole. E 1 un caso interessante, ma- 
ledettamente interessante,. . 

Il programma 

11 colpevole* il bugiardo e il mezzo bu- 
giardo (che possono coincidere o meno) 
vengono scelti casualmente aIFmizio del 
gioco. Quindi I indagine si ripete sempre 
in maniera diversa ogni volta che si digita 
RUN, All’inizio compare un menu che vi 
permette di scegliere tra l'interrogare i 
sospetti, riepilogare le risposte ottenute 
sino a quel momento e formulare un'ac- 
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cusa k da utilizzare quando si è finalmente 
scoperto l'assassino. 

Si possono fare tre tipi di domande, al 
fine di accertare il movente, il possesso di 
un arma e l'opportunità di compiere il 
misfatto. Il programma vi chiede ehi vo- 
lete interrogare, poi su quale dei sospetti 
volete informazioni (non è però possibile 
chiedere a uno di loro qualcosa su se 
stesso). 

La logica di funzionamento de! pro- 
gramma è molto semplice. Viene prepa- 
rata una tabella di sei righe e tre colonne, 
come quella di figura t T in cui su ogni riga 
vi è uno dei sospetti e sulle colonne i tre 
parametri chiave: il movente* Tarma c 
l'opportunità. 


f*$(6) contiene i nomi dei personaggi. 
MV$(4) contiene le risposte sul 
movente. 

OPS{6) le risposte sul l'opportunità. 
RS(20) le risposte degli interrogati 
(riepilogo). 

Questa fase termina alla linea 105, 
Alle linee 110-125 vengono scelti ca- 
sualmente il colpevole, il bugiardo c il 
mezzo bugiardo e viene di conseguenza 
preparata la tabella di verità. 

Viene allora stampato il menu (linee 
135- 150) c, a seconda della scelta, si ese- 
guono i sottoprogrammi Telativi, 

L’interrogatorio, le cui modalità di 
svolgimento abbiamo già spiegato, viene 
realizzato alle linee 165-240. 



personaggio 

movente 

arma 

appo n. 

1 

Madonna 

1 

1 

1 

1 

M Jagger 

0 

1 

0 

0 

D Bowie 

1 

1 

0 

1 

T. Turner 

0 

0 

1 

2 

Bob Dylan 

0 

0 

1 

1 

Sting 

! 

0 

1 


Figura 1 - La tabella di verità II colpevole è Madonna, ri buqiardo-D Bowie. il r-iezzo bugiardo Bob 
Dylan. 


Il colpevole è l’unico con tutti e tre i 
parametri posti ad 1 (Madonna, nell'e- 
sempio in figura). Quando formuliamo 
una domanda, viene fatto un salto nella 
prima colonna della tabella, 

• Nel caso vi si trovi un uno (1) (Ma- 
donna, Jagger T Tumer* Sting) viene scel- 
la, casualmente, una delle possibili ri' 
sposte di conferma. 

• Nel caso di uno zero (Bowie), una 
delle risposte di smentita. Se l'interroga- 
to è un bugiardo la situazione precedente 
si in verte, conferma nel caso dii), smenti- 
ta nel caso di 1. Per il mezzo bugiardo 
(Dylan 1 la scelta tra smentita e conferma 
è completamente casuale, 

I no sguardo al lutato 

Il diagramma dt flusso è riportato in 
figura 2 La fase di iniziai izzazio ne consi 
ste nello scegliere t colori di sfondo (blu) 
e di dimensionamento degli arrays, 

TV (63Vè la Tabella di ventà. 


Il riepilogo alle linee 425-450, 

L'accusa alle lìnee 315-420. 

Se il caso si conclude felicemente, vie- 
ne assegnato un punteggio che tiene con- 
to del numero di domande fatte e del 
tempo impiegato, hi casi? di errore il rie- 
pilogo vi permetterà di capire perchè 
avete sbagliato. 

I e linee 460-645 non necessitano di 
spiegazione: le uh ime quattro infine rea- 
lizzano un effetto sonoro. 

Possibili sviluppi 

II programma offre molteplici spunti 
per un ulteriore sviluppo. Si possono au- 
rne rotare il numero di possibili risposte, 
cambiare scenario* cambiare i personag- 
gi, Questo tipo di modifiche non aumen- 
ta la difficoltà del gioco, che può essere 
incrementata, ad esempio, aumentando 
il numero di sospetti. Attenzione, però, 
che se si aumenta solo il numero di quelli 
che dicono la verità, diminuisce il peso 
dei bugiardi ; quindi è opportuno aumen- 
tare anche il numero di questi ultimi. Il 


programma riconosce per bugiardo il 
personaggio che ha uno!) nella colonna 0 
della tabella di verità. 

Se TV(J,f!)=Q allora l’Iesimo perso- 
naggiot bugiardo, per il mezzo bugiardo 
TV(L0)=2, 



« 


oo 

Figura 2 - Diagramma di flusso. 
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10 REM 
15 REM 
20 : 

E5 REM 
30 REM 
E 


CHI HA UCCISO 
MICHAEL JACKSON? 

DI ANTONIO UISCONTI 
PER QUALSIASI COMMODOR 


40 REM I POSSESSORI DI COMPUT 
ER DIUERSI 

4S REM DAL C-64 DEUONO CAMBIA 
RE 

50 REM IL NUMERO CHE SEGUE CO 
N UNO 

SS REM QUALSIASI 
50 : 

SS CQMPUTER-S4 
70 : 

75 REM #»mm*****mm**«*** 

80 IF CO-64 THEN REM INSERIRE 
LE POKE DI SCHERMO PER IL 
C-64 
05 : 

90 REM INSERIRE QUI I COMANDI 
□I COLORE BORDO E SCHERMO 
PER C-lS E UIC 20 


DIM TUC6,33,PSC63, MUSC43 , OP 
SCG3 .RSC233 :FL-RNOC-TI/493 : 
GOSUB 460 

GOSUB 545;FR-200:FOR 1-1 TO 
B ; TUC I ,03-1 :NEXTI 
KL-INT(RNDC03*6+13:FOR 1-1 
TD 3: TUCKL, 13-1 : NEXTI 
FL-INTCRNDC03*B+1 3 : TUCFL ,03 
-0:FL-INTCRNDC03*6+13 :TUCFL 
, 03-2 

FDR 1-1 TO B: J-INTCRNDC03*3 
+ 13 : TUC I , J3-Ì 

J-INTCRND(0)*3+1>:TUCI , J3-1 
: NEXTI 

T I S- " 000000 ":TM- TI 
UR-0:FOR 1-1 TO £ : I F TUC 1,0 
1-2 THEN UR-1 

NEXT : FDR 1-1 TO B:IF TUC 1,0 
3-0 THEN UR-UR+1 
NEXT : IF UR<>2 THEN RUN 
PRINTCHRSC 1473 ”CHE COSA UUO 
I FARE ?” 


100 


105 


110 


115 


120 

125 

130 

131 

132 

133 
135 


140 

145 

150 

155 

1G0 

IBS 

170 


175 


100 


185 


190 


200 


205 


210 


215 


220 


230 


240 

245 


250 


PR I NTCHRSC 173 ”t RUS3 1CRUOFF 
1 INTERROGARE I SOSPETTATI" 
PRINT"CRUS3 2CRUOFF3 RIEPIL 
□GARE" 

PRINT'TRUS] 3CRUOFF3 FORMUL 
ARE UN'ACCUSA” 

GET AS:ON UALC AS3GOTO 165,4 

25,315 

GOTO 155 

GOSUB B50 : IF K>20 THEN 245 
PRINTCHRSC 1473 "CHI UUOI INI 
ERROGARE ?” : PR1NT ; PRINT: PRI 
NT 

FOR 1-1 TO B: PRINT: PRINT”CR 
USD ” ; I ; "CRUOFF3 ” ; ” ” ; PSCI3: 
NEXTI 

GET AS: T5-UALCAS3 : IF TS<1 0 
R TS>G THEN 1B0 
GOSUB 650: PRINTCHRSC 193 ”SU 
DUALE DEI SOSPETTATI PRINT 
”UUDI INFORMAZIONI ?” 

GET A$: SP-UALC ASO : IF SP< 1 0 
R SP>6 OR SP-TS THEN 190 
GOSUB GS0: PRINTCHRSC 1473 ”QU 
ALE E’ LA TUA DOMANDA ?" 

PR I NTCHRSC 173 ’’CRU53 1CRUOFF 
3 ” ; PS CSP 3 ; ” AUEUA UN MOUEN 
TE ? 

PRINT”CRUS3 2IRUOFF3 ”;P$CS 
P 3 ; " POSS I EOE UN * ARMA ? ” 
PRINT'*: RUSD 3CRUOFF3 DOUE " 
; PSCSP3 ; ” SI TROUAUA ?" 

GET AS: R-UALCAS3 : IF R< 1 OR 
R>3 THEN 215 

GOSUB G50 : ON RGOSUB 255,275 

,29S: PRINT: PRINT 

RSCK3-PSCTS3 + ’’ DICE CHE ”+P 

$ CSP 3 : PRINTRSCK3 : PRINTTBS : R 

SCK3-RSCJO+TBS 

K-K+l : PRINTCHRSC 173 "PREMI U 

N TASTO” 

GET AS: IF AS-’"' THEN 235 
GOTO 135 

PRINTCHRSC 1473 "TROPPE DOMAN 
DE; ”:PRINT”AURESTI GIÀ’ OOU 
UTO INDOU1NARE! ” 

CL- 100: GOTO 340 
TBS— " ” : I F TUCSP , 1 3— TU CTS, 0 3 
THEN 270 
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260 IF TUCTS,03-2 THEN FL-RNDC0 
5 : IF FL< .5 THEN 270 
265 TBS* ” NON” 

270 FL-INTCRNDC0)*4+13 : T8S-TBS+ 
MUSCFL) : RETURN 

275 TBS-””:IF TUCSP, 23-TUCTS , 03 

THEN 230 

2B0 IF TU CTS, 03-2 THEN FL-RNDC0 
3 : IF FL< .5 THEN 230 
2B5 TBS*" NON” 

230 FL-INTtRNO(03*4+l3 : T8S-T8S+ 
11 POSSIEDE UNA PISTOLA” : RET 
URN 

235 IF TUCSP, 33-TUCTS.03 THEN 3 
10 

300 IF TUC TS , 03-2 THEN FL-RNDC0 
3 : IF FL< .5 THEN 310 
305 FL-INTCRNDC03*3+13 ; TBS-OPSC 
FL3 : RETURN 

310 FL-lNTCRNDC03*3+43 : TBS-OPSC 
FL3 : RETURN 

315 GOSUB 650: PR I NTCHRSC 147 3 "CH 
I E’ SECONDO TE L’ASSASSINO 

9 t* 

320 FRJNT: PRINT: PRINT: FOR 1-1 T 
0 6 : PRINT : PRINT”CRUS3 ” ; I ; ”C 
RUOFF] ” ; ” " ; PS ( I 3 : NEXT I 
325 GET AS: CL-UALCAS3 : IF CL<1 0 
R CL>6 THEN 325 
330 IF CL-KL THEN 390 

335 PR I NTCHRSC 1473 ” SBAGLIATO 

| >V 

li 

340 PRINT” IL COLPEUOLE E’ ”;PS 
(KL3 

345 PRINT "PERCHE ’ HA MOUENTE , AR 
HA ED OPPORTUNITÀ”* 

350 FOR 1*1 TO B : I F TUCI.03-0 T 
HEN BG-I 

355 IF TUC 1,0 3 -2 THEN MB* I 
360 NEXTI 

365 PRINT" IL BUGIARDO E' ”;P$C 
BG3 

370 PRINT” IL MEZZO BUGIARDO 
PSCMB3 

375 PRI NTCHRSC 173 "PREMI UN TASI 
0 " 

3B0 GET A$;IF AS-"” THEN 3B0 

385 LA* 1 : GOTO 425 

330 PRI NTCHRS C 147 3 "C 8 DOUN1 ESA 


3S5 


400 


405 


410 


415 

420 

425 


430 

435 

440 


445 

450 

455 

460 

465 

470 

475 

480 

4BS 

430 

435 

500 

505 

510 

515 

520 


530 


535 


TTO I ” 

PRINT” COHPL I HENT I SEI UN OT 
TIHD INUESTIGATORE” 
PRINT”HAI INDOUI NATO DOPO " 

; K ; ” DOHANDE” 

PRINT”IL TEMPO IMPIEGATO E’ 
STATO DI ” 

PRINT "ORE ” ; LEFTSCTIS , 23 ; ” 
MIN. MID$CTI$,3,23 ; ” SEC. 

”jRIGHT$CTIS,23 
PRINT "CONDUI STI PUNTI ” ; 200 
0~K*100-C T I— TM 3/60 
END 

GOSUB 650: PRINTCHRSC1473 : FO 
R 1-0 TO 10 : PRI NTRS C 1 3 : NEXT 
I : PRINT”PREMI UN TASTO” . 
GET AS : I F AS-’”* THEN 430 
IF K< 1 1 THEN 450 
PRI NTCHRS C 147 3 : FOR 1-11 TO 
20 : PRI NTRS C I 3 : NEXTI : PRINT”P 
REMI UN TASTO” 

GET AS:IF AS-”” THEN 445 
IF LA THEN END 
GOTO 135 
PS C 1 3 “"MADONNA ” 

PSC 23 * "MICK JAGGER” 
PSC33-”DAUID BOUII E” 
P$C43-”TINA TURNER" 
PSC5)-”B0B DYLAN” 
PSC6)-”STING” 

MUSC1 3-” ODI AUA M.J.” 
MUSC23-” AUEUA UN BUON MOTI 
UO PER UCCIDERE” 

MUSC33-" PROUAUA INUIDIA PE 
R M.J," 

MUSC 4 3“’’ DOUEUA DEI 5DLDI A 
M.J.” 

□PSC 1 3* ” ERA NELLA PROPRIA 
STANZA ” 

0PSC23-” ERA ANDATO A DORMI 
RE PRESTO ” 

OPSC33-” FORSE ERA IN CUCIN 
A A FARE UNO SPUNTINO ” 
0FSC43-" NON ERA NELLA PROP 
RIA STANZA ” 

OPSC53-” ERA COL MORTO FINO 
A POCO PRIMA DELLO”+” ”+” 
SPARO" 

OPSC63-” ERA... CHISSÀ' DOU 


DOUEUA DEI SOLDI A 


ERA NELLA PROPRIA 


ERA ANDATO A DORMI 
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E ” 

540 RETURN 

545 FR INTCHRS C 147 3 ”UN COLPO D’A 
RMA DA FUOCO” 

550 PRI NT "RIECHEGGI A NELL’ARIA, 

Ir 

555 PR INI "NEL CORRI OC IO GIACE U 
N CORPO SENZA UITA , " 

560 PR I NT ”UN RUflORE DI PASSI” 

565 PRINT”CI DICE CHE QUALCUNO 
STA FUGGENDO . ” 

570 PR INTCHRS C 173 "PREMI UN TAST 
□ ” 

575 GET A$:IF AS-"” THEN 575 

590 PRINTCHRSC 1473” CHI HA UCCI 
SD” 

585 PRI NT "MICHAEL JACKSON ?” 

550 PRINTCHRSC 173 "PREMI UN TAST 
0” 

595 GEI AS : I F AS-”” THEN 595 

600 PRINTCHRSC 1473 ” I SOSPETTI 
SONO CONCENTRATI SU” 

605 PRI NT "SOLO 6 PERSONE» 

610 PRI NT ”A TE IL COMPITO DI SC 
DPR IRE L’ASSASSINO” 

615 PR I NT "ATTENZ I ONE !” :PRINT 

620 PRINT”- UNO DEI SOSPETTI ME 
NTE SEMPRE” 

625 PRINT’’- MENTRE UN ALTRO SOL 
0 QUALCHE UOLTA” 

630 PRINT: PRI NT”NON FARTI INGAN 
NARE ! ’* 

635 PRINTCHRSC 173 "PREMI UN TAST 
0” 

640 GET AS : I F AS-”” THEN 640 

645 RETURN 

650 IF C0< >64 THEN RETURN 

555 FOR 1-54272 TO 54295 :POKE I 
, 0 : NEXT : POKE 54296,15 

660 W-S427E: POKE U+2,9:P0KE W 
-3 , FR : PDKE W , 23: POKE U , 22 

665 FOR 1-0 TO 100 : NEXT : RETU 
RN 
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GIOCHI 

COMMODORE 64 


Costruisci un labirinto! 


Un videogioco 
divertente, semplice 
da comprendere e 
molto breve. Utile, 
soprattutto, a chi 
vuole capire come 
manovrare gli 
sprites e generare 
un suono. 


di Maurizio Dell* Abate 



ucsti programmi possono girare 
f funzionare) soltanto sul Commodore 
64. Non è possibile, in BASIC, un adat- 
tamento ad altn Commodore, essendo il 
gioco impernialo su una caraneristica es- 
clusiva del Commodore 64: gli sprites. I 
possessori di altri computer possono tut- 
tavia leggere quelle parti dell'articolo va- 
lide per tutti i Commodore, come il fun- 
zionamento di alcune istruzioni BASIC 
o particolari tecniche di progamma- 
2 ione. 


Come inventare un gioco 

Quest'articolo è rivolto a quanfi vor- 
rebbero programmare un videogioco, 
ma non posseggono sufficiente esperien- 
za per farlo. Si è evitato quindi di appro- 
fondire ulteriormente argomenti che ri- 
sulterebbero troppo complessi e che da- 
rebbero luogo, al contrano, a un'impro- 
duttiva confusione 


L* Idea di ba$t 

Con una sola riga (vedi primo listato) è 
possibile tracciare su! video labirinti ca- 
suali che sembrano accuratamente pro- 
gettati e piuttosto complessi. 

La routine visualizza in successione una 
delle due sbarrette (caratteri semigrafici) 
che si ottengono premendo SHIFT + N 
oppure SHlFl + Mi, La sbarretta da vi- 
sualizzare viene scelta casualmente e si 
ottengono labirinti simili a quello di figu- 
ra 5, 

Le videate che ne risultano sembrano 
suggerire un gioco in cui è necessario 
percorrere disordinati corridoi e T ovvia- 
mente, raggiungere l’uscita 

Si è pensato quindi di realizzare un 
videogame il cui scopo principale sia 
quello di risolvere (usiamo pure questo 
termine) un labirinto. Scartata a priori la 
possibilità di percorrerlo facendo scorre- 
re un dito sul video (ri sarebbe tra l'altro 
la necessità di trapassare i muri!), si è 


scelta la soluzione più razionale: utilizza- 
re un minuscolo sprite che si muove sotto 
il comando di quattro tasti. 

Sprite; chi era costui? 

Per coloro che non sanno cosa sia uno 
sprite, chiariamo subito: gli sprites sono 
figure disegnate dall'utente posizionagli 
in qualsiasi punto del video. Si possono 
sovrapporre ai caratteri senza cancellarli 
e sono del tutto indipendenti dal “testo”. 
E' possibile leggere anche una collisione 
con il testo sottostante (il nostro omino 
con i muri del labirinto) e far agire il 
programma di conseguenza. 

Si possono visualizzare fino ad otto 
sprites contemporaneamente (numerati 
da 0 a 7), ma tutto dò che sarà detto in 
questo articolo si riferisce allo sprite nu- 
mero zero. Si consiglia tuttavia a coloro 
che di sprites sanno poco o niente t di 
leggere attentamente le (poche) nozioni 
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riportale sul manuale del C-64 per segui* 
re meglio il resto di quest'artìcolo. 


Ln' immagine più precisa dd gioco 

Cerchiamo ora di crearci un'immagine 
del gioco piu concreta e precisa ricorren- 
do alia sceneggi a tura" del gioco stesso, 
inventandoci, in altre parole, le azioni da 
compiere affinchè il gioco sta sufficiente- 
mente complesso e divertente. 

Il nostro omino (sprite) si trova davan- 
ti a una riga dì labirinto da cui è facilissi- 
mo uscire. Ma ecco che, appena l'abbia- 
mo condotto airuscita, il labirinto si in- 
grandisce: viene aggiunta un'altra riga e 
l'omino torna a ir inìzio, costretto stavol- 
ta a percorrere due righe di labirinto. 

Il nostro povero sprite, che si illude 
ogni volta di uscire da quella gran confu- 
sione di muri, vede crescere davanti a sè 
un percorso sempre più grande e T sebbe- 
ne demoralizzato, lo ripercorrerà tutto 
dalLìnizio. La sua perseveranza verrà 
premiata se riuscirà ad uscire da ben 20 
righe. A questo punto iì gioco finirà e il 
computer sì complimenterà con luì. anzi 
con noi, perchè l'abbiamo guidato. 

Due ostacoli rendono difficile la vita 
del nostro omino: i muri elettrici (un mi- 
liardo di voltaiche lo fanno tornare alla 
posizione iniziale se vengono toccati e il 
tempo limite {5 minuti). Se il tempo a 
disposizione termina prima del comple- 
tamento del percorso la partita termina. 

Una volta stabilita la "storia'' (forse 
non molto fantasiosa, ma utile per inizia- 
re), è necessario passare alla pratica. 
Sappiamo bene che tra il dire e il fare c'è 
di mezzo il computer, ma vedremo di 
fare del nostro meglio .. 

Le prime righe di programma 

I programmi pubblicati sono tre: la 
parte facoltativa (ne parleremo alla fi- 
ne), il gioco scarno e il gioco finito. 

Che cosa sì intende per gioco scarno? 
Partendo dall’idea di un gioco è necessa- 
rio. per arrivare alla versione definitiva 
dello stesso, suddividere il lavoro in più 


tappe o fasi. Non possiamo certo preten- 
dere, airinbrio, di programmare un vi- 
deogame in un colpo solo’ 

Il programma scarno è una bozza del 
gioco. Deve essere molto povero c con 
tenere solo l'essenziale. Solo successiva- 
mente, quando lutto funzionerà a dove 
re, potremo aggiungere colori, grafica, 
suoni e sofisticarlo ulteriormente arri- 
vando al programma finito. 

Ma torniamo a noi: il gioco scarno 
(d’ora i n poi lo chiameremo così ) è molto 
più povero del gioco finito: non è previ- 
sto il controllo dd tempo, mancano i 
messaggi di condoglianze (!) e di vittoria, 
non è possìbile la sedia del livello di 
difficoltà, è privo di suoni e di colon E' 
bene che sia così perchè sarà più facile 
analizzarlo, rintracciare eventuali errori 
e stabilire se la "storia" è cosi interessan- 
te come sembrava al momento della pro- 
gettazione. In seguito magari, passo per 
passo, lo integreremo fino a giungere al 
terzo programma (gioco finito). Prima, 
però, chiariamo alcuni punti che servi- 
ranno per comprendere meglio il pro- 
grammino. 

Parlar di iprite 

Probabilmente già sapete che uno spin- 
te deve essere disegnato su una griglia di 
24*21 quadretti (rispettivamente oriz- 
zontale - verticale). In ogni fila possiamo 
distinguere tre ^sottofile” (parte di una 
fila: termine brutto ma significativo) da 
otto quadretti l una (24/3=8) per un to- 
tale di 63 sottofile (8*21), Ogni sottofila 
è un byte e ogni quadretto si chiama bit. 
L'immagine di un qualsiasi sprite occu- 
perà quindi 63 bytes di memoria. 

I bit possono trovarsi in due stati, ac- 
cesi o spenti: i quadretti accesi corrispon- 
dono ad un 1 (uno) e quelli spenti a uno 
zero (0), Ogni byte è quindi un numero 
binario composto da otto cifre che posso- 
no essere zero o uno. come per esempio 

(noi ioii, oooiiooo, ìoioimo, 

limili, eccetera. 

Arrivati a questo punto dobbiamo 
convertire in decimale ì 63 numeri binari 
che danno forma allo spnte seguendo 


questa semplice procedura: a ciascuno 
degli otto bit (cifre ) corrisponde un vaio 
re decimale 

Partendo da destra, pertanto, t sud- 
detti valori sono: 1, 2 , 4. 8, 16, 32, 64, 
128. Per ottenere il valore decimale, 
sommiamo tra loro i numeri eomspon 
denti ai bit accesi (1), Il numero binario 
1 1000001 per esempio, corrisponde a : 

128 +64 +0+0+0+0+04-1= Ì93 (valore 
decimale). 

I più brillami di voi avranno senz'altro 
capito che un numero binario di H bit 
(come nel nostro casoj non può essere 
minore di zero (00000000) e non può su- 
perare il valore 255 (1111 11 1 1 ). 

II nostro sprite (che assume il ruolo di 
omino) deve essere molto piccolo per 
muoversi agilmente nel labirinti): due pi- 
xels (=bit sullo scherniti) stinti la gran- 
dezza ideale. Di tutta la griglia per dise- 
gnare gli sprites. not occupiamo quindi i 
primi due bit del primo byte, che avrà 
come valore decimale 1Ù2 (128+64), I 
restanti 62 byte avranno valore nullo (ze- 
ro) e saranno, come si dice in gergo, 
"resettati'\ 

Come certo saprele, la memoria dd 
C ommodore 64 è formata da tante loca- 
zioni (esattamente 65536) numerate da 0 
a 65535. Ognuna di queste "contiene'' un 
byte e quindi un numero compreso tra 0 
a 255, Sarà proprio in alcune dì queste 
locazioni che depositeremo i 63 numeri 
che danno forma allo sprite. Attenzione, 
però: non è possibile partire da una loca- 
zione qualsiasi (ad es, la 36547) per me- 
moriazzare i valori, ma devono verificar- 
si tre condizioni, cioè: 

• la locazione iniziale deve essere un 
multiplo di 64 poiché, per segnalare al 
computer dove rintracciare i valori rela- 
tivi al nostro sprite, si deve immettere 
nella locazione 2040 (che assume iì com- 
pilo di pro-memoria o "puntatore") il 
numero della prima locazione divisti per 
64 (indirizzo — locazione). Rileggete at- 
tentamente e lentamente se il concetto 
non è chiaro; 
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206,5 206,5 

Figura 1 * Sommando a 205,5 un numero casuale compreso Ita *en> e uno, si crtter» un secondo numero 
che sarà l'argomento dalla funzione CHFlS Questa furo Ione pronte in eons»toraziofìe sotìanio la parte intera 
del numero, quindi $t avrà II 50% dì possibilità cte il numero eia 205 (sberretta SHIFT + M), attenerne sortole 
possibilità che il numero sia 206 f codice detta sbarretta SHIFT + N). 


• la locazione di inizio non pud essere 
superiore a Ì632Q. Questo è il valore 
massimo che può assumere l'indirizzo 
della locazione, dato che il puntatore 
non può essere superiore a 255. Tale va- 
lore, moltiplicato per 64, fornisce appun- 
to 16320. 

Si potrebbe andare anche oltre questo 
numero, ma sarebbe necessario ricorrere 
a tecniche di programmazione piuttosto 
complesse; 

• con i nostri dati non dobbiamo, inol- 
tre, "contaminare” locazioni usate dal 
sistema operativo del calcolatore. 

Per i dati del nostro omino utilizzere- 
mo, in definitiva, le locazioni numerate 
da 832 a 895 che possiamo considerare 
libere* 

La riga 500 (ci riferiamo a) programma 
scarno, che è il secondo listato) azzera 
tutti i bytes da 832 ad 895 e pone, me- 
diante istruzione POKE, neNa locazione 
2040 ( puntatore del nostro sprite) il valo- 
re 13, Infatti 832 diviso 64 fa proprio 13, 
La figura 2 dovrebbe spazzare via ogni 
ombra di dubbio su quanto è stato detto 
finora. 

Nella nga successiva viene immesse,! in 
locazione 832 i 1 valore 192 (due piseli 
affiancati ) Quando uno spnte è compo- 


sto da pochi punti, come nel nostro caso, 
è superfluo usare il metodo tradizionale 
per immettere i valori in memoria 
(READ <fe DATA): è molto più breve, 
più veloce e più comodo azzerare t 63 
bytes interessati (mediante FOR- 
...NEXT) e pokare (immettere in me- 
moria) i pochi valori diversi da zero nelle 
locazioni desiderate. 

La riga 515 stampa (visualizza sullo 
schermo) 27 spazi in re verse (negativi) 
allineati, per ottenere un '"muro"' che 
impedisca al nostro sprite di uscire dallo 
schermo vótso Fallo, La riga successiva 
crea una zona libera, sbarrata ai lati con 
due spazi reverse; il centro di questa riga 
libera sarà iì punto di partenza 
delFomino, 

La riga 518 controlla, per mezzo di 
un'istruzione IF...THEN se le righe di 
labirinto "coperte’’ sono 20 e, se la con- 
dizione si avvera, pone fine al gioco 
(END). 

La riga 520 stampa uno spazio in rever- 
se, che sarà la barriera laterale sinistra 
della riga di labirinto che ve irà stampata 
a lato. 

Nella riga 530 viene calcolato un nu- 
mero casuale compreso fra zero e due 
per mezzo delia funzione RND(l); essa 
genera un numero decimale casuale 
compreso fra zero e uno (diverso, però, 


da (1 e 1), Il numero casuale viene poi 
moltiplicato per il contenuto della varia- 
bile LV, alla quale era stato precedente- 
niente assegnato il valore 3 (riga 505). 
Nella variabile NU viene infine posta la 
parte intera del risultato, che sarà mag- 
giore di 0 (cioè 1) e minore o uguale a 2 
(cioè ancora 1 oppure 2), 

Perchè questo? Supponiamo che la 
funzione RND generi il numero più alto, 
cioè 0,999... Questo valore viene molti- 
plicato per tre, ma non si ottiene tre, 
bensì, ovviamente, 2,999... Di questo 
numero viene presa la parte intera, cioè 2 
(due). 

Da ciò possiamo ricavare la seguente 
regola: 

per ogni valore assegnato alla variabile 
“Y", il calcolo: 

X^(NT(RND(1)*Y) 

porterà come risultato a un valore "X" 
tale che X sarà comunque maggiore di 
zero e minore o al massimo uguale a Y-L 

Nelle due righe successive (540-550) 
viene stampata una riga di labirinto. 

La scelta casuale fra le due sbarrette è 
molto particolare. Ogni carattere o fun- 
zione esprimibile con un carattere (es. 
CLR/HOME = cuore in reverse) sono 
contrassegnati da un numero detto codi- 
ce ASCII. 11 codice ASCII di tutti i carat- 
teri si trova nelle appendici di qualsiasi 
manuale Commodore. Il comando 
PRINT CHRJ(X) visualizza il carattere 
il cui codice ASCII è X, 

Che relazione ha tutto ciò con il nostro 
labirinto? 

Il codice CHRI (ASCII) della sbarret- 
ta che si ottiene premendo SHIFT con- 
temporaneamente a M è 205; quello del- 
l'altra sbarretta è 206 (SHIFT + N). 
Sommando al numero 205.5 un numero 
casuale compreso fra zero e uno, si ottie- 
ne un secondo numero (minimo: 
205.5 +0=205,5 massimo: 

205.5 + 1=206,5) che sarà l’argomento 
(valore tra parentesi) della funzione 
CHRS. La suddetta funzione prende in 
considerazione, come già detto, soltanto 
la parte intera del numero e quindi si 
avrà il 50% di probabilità che il numero 
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Figure 2 - La figura rappresenta l'angolo in aito a sinistra delta griglia 24*21 che compone il nostro aprite 
Questo É formato da A* soli pixel. 


sia 205 (ASCII della sbarretta 
SHIFT+M); altrettante sono le possibi- 
lità che il numero sia 206, codice della 
sbarretta SHIFT + N (figura 1). 

Tra una sbarretta e la successiva viene 
posto un certo numero di spazi vuoti per 
rendere più facile la risoluzione del labi- 
rinto. Per inserirli viene usata la funzione 
SPC (derivante da SPaCe) il cui argo- 
mento è la variabile NU, cui era stato 
assegnato un altro numero casuale. Va- 
riando il valore della variabile LV avre- 
mo quindi un labirinto più difficile (se 
LV è basso) o più semplice (LV alto). 

Un paio di caratteristiche particolari 
vanno notate a proposito della funzione 

SPC{): 

• questa funzione, dopo aver stampato 
gli spazi, non implica il ritorno a capo 
anche se il punto e virgola (;) non è pre- 
sente, Scrivere, per esempio, 
PRINTSPC(IO) (senza punto e virgola) 
provoca il medesimo effetto di 
PRINTSPCf 10); (col punto e virgola) ; 

• è itti proprio affermare che questa fun - 
rione stampa un certo numero di spazi , 
perchè, in realtà, provoca semplici spo- 
stamenti a destra del cursore. 

Al tenti ine della riga di labirinto (sbar- 
rette e spari) viene stampato un altro 
spazio in reverse per impedire l'uscita del 
nostro omino verso destra. 

Una visione globale del gioco è illu- 
strata in figura 5. 

Una prima limitazione 

Molti lettori si saranno posti una do- 
manda: perchè il labirinto è largo solo 25 
colonne e non sfrutta rimerò schermo 41 II 
video dei C-64 è composto da 40 colonne 
e, dato che in ciascuna di queste può 
prender posto un carattere di formato 
8*8 pixel (puntini elementari), il numero 
di pixel orizzontali è 320. 

Uno sprite non può andare oltre i tre 
quarti dello schermo (ai quali corrispon- 
de la massima coordinata orizzontale die 
è 255) perchè nella locazione destinata a 
contenere l'ordinata è possibile memo- 
rizzare un numero compreso tra zero e 


255 (tra poco pariamo di come posiziona- 
re uno sprite). 

Sarebbe possibile ovviare a tale incon- 
veniente , ma in questa sede non è oppor- 
tuno dire come, per non complicare il 
discorso. 

Siamo co 9 - arrivati alla riga 560 che 
contiene una POKEV+2t,L Questa 
istruzione abilita lo sprite,. facendolo 
comparire sul video. 

V +21 (V=53248, riga 500) significa 
53248+21, cioè 53269, locazione che 
controlla l'abilitazione (tacceso, spento) 
degli sprites. 

Perchè scrivere allora POKEV+21,1 e 
non direttamente PGKE53269,!? Per- 
ché tutte le locazioni da 53248 a 53294 
hanno a che fare con gli sprites (coordi- 
nate, abilitazione, espansione, colore, 
priorità, collisioni eccetera). Ricordarse- 
le tutte è un po' arduo, vi pare? E' molto 
più semplice ricordare un numero di due 
cifre (tra cui 21) e sommarlo a una varia- 
bile (V) cui è stato precedentemente as- 
segnato il valore 53248. 

Torniamo al programma scarno. 

La riga 570 pone nella variabile X il 


valore 134 e nella variabile V il valore 6(1. 
Queste due variabili contengono le coor- 
dinate dello sprite (X ascissa Y ordina- 
ta), 134 e 60 sono le coordinate del no- 
stro omino in posizione di partenza, ov- 
vero nella parte alta dello schermo. Ri- 
mandiamo sempre alle illustrazioni per 
chiarire il discorso (figura 5), 

La riga successiva (580) immette nella 
locazione di memoria V (53248) il valore 
di X e nella locazione V+l il valore di Y, 
La locazione 53248 contiene la coordina- 
ta orizzontale (X) dove lo sprite deve 
essere visualizzato, mentre la locazione 
53249 contiene la coordinata verticale (Y 
= ordinata). 

Le coordinante partono dal lato sini- 
stro dello schermo per la X e dal lato 
superiore per la Y, Il punto definito con 
tali valori, distante X da sinistra e Y dal- 
l'alto, coincide con l'angolo in aito a sini- 
stra (anche se spento) della griglia usata 
per disegnare lo sprite. Per la precisione 
è bene ricordare che le due distanze non 
vengono prese dai bordi della parte visi- 
bile dello schermo, ma da un rettangolo 
più ampio comprendente anche la zona 
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del bordo del video. Questo fatto può 
esser sfruttato, ad esempio, per far com- 
parire uno sprite a ir improvviso, 
dall'esterno 


U gestione delle collisioni 

Passiamo alla riga 585, trascurando, 
per il momento, il resto della riga 580, 

Viene letto (FEEK) il contenuto della 
locazione V+3L La locazione V+31 ri- 
vela un'eventuale collisione tra uno spri- 
te e un carattere qualunque presente sul- 
lo ????' delio schermo (come quelli che 
formano i muri del labirinto). Se il nostro 
sprite (numerato con zero) “tocca” un 
carattere o un qualsiasi punto acceso del- 
lo schermo (che non sia un altro sprite), il 
bit più a destra di questa locazione diven- 
ta I lasciando inalterati gli altri e, di con- 
seguenza,, anche il contenuto della loca- 
zione è l t in decimale. 

La locazione V+31 ha delle particola- 
rità come del resto anche la locazione di 
collisione fra sprite, che però non com- 
pare nel gioco: 

• dopo una lettura (PEEK), la locazio- 
ne si azzera automaticamente. Se k> spri- 
te che era in collisione lo fc ancora (dopo 
la lettura), V+31 riprende il valore I; 

# se lo sprite è in collisione con un carat- 
tere, la locazione in questione assume il 
valore 1. Se poi viene tolto dallo stato di 
collisione, modificando opportunamen- 
te le coordinate, la locazione mantiene, 
nonstante ciò, il valore 1, Deriva, da ciò, 
una fondamentale considerazione: 

la locazione V+3t si azzera solo dopo 
una lettura con un’istruzione PEEK. 

Ora siamo in grado di capire cosa suc- 
cede nel programma. 

Se lo sprite è in collisione, 
PEEK(V+31)=1, ovvero il nostre omi- 
no ha toccato un muro, si toma alla riga 
570 dove le coordinate vengono poste a 
134 e 60 (omino in partenza). Se lo sprite 
non è in collisione si passa alla riga 
successiva. 

Precedentemente si è rinviata la de- 
scrizione dell’ultima parte della nga 58(1 


6S - Commodore Computer Club 


m 




















GIOCHI 


che mette nella variabile J il contenuto 
della locazione V+31 (ora sappiamo a 
che cosa serve). Questa variabile, J* non 
venà tuttavia utilizzata nei programma. 
A che serve, allora? 

Supponiamo che si sia verificata una 
collisione e vediamo in sequenza cosa 
avviene: 

• la riga 585 rileva la collisione; 

• si passa alle istruzioni successive a 
THEN; 

• il contenuto di V+31 è ancora ! per- 
chè lo sprite è sempre in collisione; 

• si toma alla riga 570; 

• lo sprite viene rimesso nella posizione 
iniziale, tuttavia il contenuto di V+31 è 
ancora I, per i motivi detti prima; 

• dopo aver posizionato lo sprite, la lo- 
cazione V+31 viene letta per azzerarla, 
assegnandone il contenuto ad una varia- 
bile a caso ( J). In questo modo la locazio- 
ne delle collisioni, per il semplice fatto di 
esser stata letta, toma a zero. 

Le cose possono andare anche diver- 
samente, Può succedere infatti che lo 
sprite venga messo in stato di collisione 
(riga 580). Successivamente viene letto il 
contenuto di V+31 (con J-PEEK...) 
che è ovviamente 1 (uno), V+31 si azze- 
ra (è avvenuta una lettura), ma toma 
subito a 1 perchè lo sprite è in collisione. 
Se però l'istruzione IR., THEN della ri- 
ga 585 legge il contenuto di V+31 prima 
che il computer labbia rimesso a 1, può 
avvenire che il programma non rilevi la 
collisione. Di conseguenza il nostro omi- 
no potrebbe trapassare tranquillamente i 
muri. 

Ricorrendo invece a un ciclo di ritardo 
(FORI=1TQ10) molto breve* ma suffi- 
ciente perchè il sistema operativo ponga 
in V +31 il valore ! (parte finale della riga 
580) si risolve il problema. 

Se non avete capito tutto questo di- 
scorso non scoraggiatevi e, n leggete 
quest "ultima parte dell’articolo. 

Siamo cosi giunti, nel nostro lungo 
cammino, alla riga 590, Un'istruzione 
Ih, ..THEN verifica se Y (coordinata 
verticale dello sprite) è maggiore di 
75 +8* Di, DI contiene il numero di righe 
di labirinto il risolte’\ L'espressione ma- 


tematica sopracitata dà come risultato la 
coordinata verticale in cui termina il labi- 
rinto. Se la condizione si attua, vuol dire 
che l’omino si trova Fuori dal labirinto. Il 
valore di "DI" viene incrementato di 
un’unità e il controllo va (GOTO) alta 
riga 518. Qui viene verificato il valore di 
DI: se DI è maggiore o uguale a 2U. il 
nostro omino è uscito da 2 tì righe di labi- 
rinto e la partita termina (END). In caso 
contrario il labirinto viene allungato di 
una riga. 

Le righe 600, 610, 620 e 630 sono ad- 
dette al controllo dei tasti. Probabilmen- 
te non conoscete la locazione 197: con- 
tiene in ogni istante il codice, compieta- 
mente differente dal eretica ASCII, del 
tasto premuto. Se (IF) il contenuto della 
locazione 197 è uguale al codice del tasto 
che si vuole sia premuto perchè la condi- 
zione si avveri, allora (THEN) il pro- 
gramma modifica opportunamente le 
coordinate e toma alla riga 580. 

Se volete conoscere il codice 197 (desi- 
gn amolo pure cost) di un qualsiasi tasto 
fate girare a parte la seguente mìcroriga e 
premente un tasto: sul video comparirà il 
suo codice: 

1 PRINTPEEK(197):G0T01 

Ma torniamo al controllo della 
tastiera. 


Se nessun tasto viene premuto si torna 
(GOTO di nga 640) al pomo IF, . THEN 
addetto al controllo tasti, ovvero alla riga 

eoo. 

Avete sicuramente notato che i corri- 
doi del labirinto sono in posizione obli- 
qua (45 gradi) rispetto alio schermo; per 
comodità quindi, anche Tornino si dovrà 
muovere in diagonale e non in orizzonta- 
le - verticale, Questo si ottiene variando 
opportunamente le coordinate: pei la di- 
rezione alto-sinistra, per esempio, viene 
decrementata dì uno sia X che Y per i 
motivi che ben potete immaginare. An- 
che i tasti devono essere disposti in dia- 
gonale! ecco giustificata la scelta di W, 
R,Z f C 

Siamo giunti al termine, finalmente. 

Il gioco vi sembra brutto? Allora al 
lavoro: aggiungiamo colori, suono, tem- 
po, punteggio e livello di difficoltà. 

Come migliorare il prugnimmà 

Se avete registrato su nastro o disco il 
programma scarno, caricatelo ora in me- 
moria. Per "trasformarlo” nel program- 
ma finito (terzo listato) non è, infatti, 
necessario ribatterlo per intero, ma sarà 
Sufficiente aggiungere, cancellare o mo- 
dificare alcune righe dei listato prece- 
dente. Questo, anzi, può essere un otti- 



uscita 

Figura * - Ecco come appare H geco sul video. Il puntino in alto è l'omìno-sp file che dobbiamo condurre 
fuori dal labirinto I muri spesa» impediscono allo sprite di andare troppo in atto fluori dallo schermo! o <ti uscire 
lateralmente 
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mo esercizio per individuare le migliorie 
apportale. 

Se avete eseguito tulio correttamente, 
fate girare il gioco: è o non è più 
gradevole? 

1 suoni 

I! Commodore 64 è dotato di un circui- 
to sonoro motto potente e versatile» ma 
relativamente complesso da programma- 
re. Non abbiamo intenzione di scrivere 
un trattato su questo argomento sia per- 
che CCC ne ha già parlato (e ne parlerà 
ancora.,.), sia perchè non t tutto così 
facile. 

Il circuito sonoro (S1D) può suonare 
fino a 3 voci separate o contemporanea- 
mente. Per semplicità ci riferiremo sem- 
pre alla voce N. ! invitando quanti vo- 
gliono approfondire a consultare il ma- 
nuale del 64 o i numeri arretrati di CCC. 

Come per gli sprites, le locazioni (o 
registri) che controllano il S1D si trovano 
in un unico “blocco" 1 , numerato da 54272 
fino a 54300. Scriveremo quindi nel pro- 
gramma S=54272: ogni successivo PO- 
Kaggto in memoria che avrà a che fare 
con ì suoni seguirà la sintassi 
POKE5+XXX,YYY 

Vediamo ora di mettere in luce come è 
strutturato un suono, 

Vi sarà capitato di premere il tasto di 
un pianoforte e di ascoltarne remissione 
sonora: 

• il volume del suono sale rapidamente 
al valore massimo; 

• successivamente si attenua; 

• persiste fino atristante in cui togliete 
il dito dal tasto; 

• poi scende a zero rapidamente. 

Per poter riprodurre lo stesso effetto 

sonoro col calcolatore dovrete defìmre i 
quattro valori delle fasi di sviluppo del 
suono che si susseguono cosi: 

“A' 1 ; Tempo in cui il suono raggiunge il 
suo massimo volume; 

"D": tempo in cui il suono si porla al 
volume medio di persistenza; 

"S 1 ': tempo in cui il suono continua a 
rimanere attivo; 

R' 1 : tempo in cui lì volume si azzera. 

In mglese i termini corrispondenti alle 
quattro lettere ADSR sono i seguenti; 
A t teck, Decay, Sustain, Retease, 


Questi valori devono essere immessi 
nelle locazioni S+5 c S+ò e variano da 0. 
Tempo brevissimi? a 15, lungo. 

Il registro S+5 viene diviso in due parli 
di 4 bit; la pane alta viene usata per 
memorizzare il valore delfattack. quella 
bassa per memorizzare la durata del 
decay, 

Anche il registro S+6 viene scisso in 
due: parte alla = sustain, parte bassa = 
reìease. 

Poiché 4 bit possono rappresentare va- 
lori da 0 a 15, avete la possibilità di sce- 
gliere un valore per ognuna delle 4 fasi in 
questo intervallo, Tuttavia per memoriz- 
zare **A'\ una volta definito il suo valo- 
re, nella parte alta de! registro 5, biso- 
gnerà ricordarsi di eseguire il prodotto 
per 16. La medesima operazione va ef- 
fettuata con S ed il registro Sló. 

Per i valori di D e di R non vanno 
eseguiti calcoli, essi vanno rispettiva- 
mente sommati ai valori di D e di S. 

Le locazioni S e S+l devono contene- 
re i due numeri che determinano la fre- 
quenza della nota (byte basso e alto); le 
frequenze si trovano nelle appendici del 
manuale Commodore. 

19 registro S+24 contiene il volume 
(unico per le tre voci), daO (spento) a 15 
(alto). 

Una volta pokati nelle locazioni sopra 
descritte i valori desiderati, possiamo da- 
re il via al suono con una POK_ES+4,I7 
(forma d’onda "dolce”). Per dare inizio 
alla fase R (release) si impartisce; PQ- 
KES+4,16 (cioè 17-1). 

Nel programma, la linea 508 genera un 
breve suono di frequenza casuale; ogni 
volta che lo desideriamo^ eseguiamo 
GOSUB508 (alla pressione di un tasto, 
quando Pomino entra in collisione, 
ecc). 

Per concludere questo argomento, ri- 
cordatevi che nelle prime righe di un 
qualsiasi programma che utilizza i suoni 
deve essere presente una routine che re- 
setta (mette a 0) tutti i registri del SfD 
come ad esempio: 

FOR I -OTO24:POKES +U):NEXT 
La va nubile dì tempo 

Se avete fatto girare il gioco, avrete 
notato che il tempo viene visualizzato 


alla destra dell ultima riga di labirinto. 
Quando ne viene aggiunta un'altra, il 
tempo si sposta più in basso e sopra resta 
il tempo impiegato per risolvere il labi- 
rinto fino a quel punto Per visualizzare il 
tempo e controllare se è scaduto (righe 
582 e 583) anche quando non sono pre- 
muti tasti, abbiamo dovuto modificare la 
struttura del programma come si vede 
nella figura 3. Il controllo del tempo, che 
ha bisogno di qualche istante per essere 
eseguito può ora sostituire il breve ciclo 
di ritardo che era presente nella riga 58(1 
del programma scarno. 

La variabile speciale TI$ contiene 
sempre Torà e parte da 0 all'accensione 
del computer, che provvede a incremen- 
tarla. Noi possiamo modificarla; ad 
esempio, se sono le nove e mezza e tran- 
tadue secondi, scriveremo: 

II$“* l G9 3032” 

A)f inizio della partita (riga 517), TTS 
viene posta a 0 C'OOOOOT); la riga 583 
controlla se sono passati 5 minuti 
(TI S>= "000500”) c, in questo caso, la 
partita termina con missione incompiuta 
e viene visualizzato il punteggio 

Altre modifiche 

Un abbellimento importante è quello 
cromatico: sono stati inseriti i colori nelle 
Àtru/ioni PRINTCHR$(), In riga 513 
vengono variati il colore dello schermo 
(locazione 53281) c il colore del bordo 
(locazione 53280): ad ogni numero corri- 
sponde un colore. 

Ricordate la variabile LV, dal cui valo- 
re dipende la difficoltà del labirinto? Con 
un’istruzione INPUT (riga 514) si è inse- 
rita nel programma la scelta del livello di 
difficoltà, da 1 (difficile) a 5 (facile). Si 
possono introdurre anche valon decimali 
( per es, 2,4); se viene immesso un nume- 
ro minore di 1 o maggiore di 5, LV viene 
posta automaticamente a 3 (piuttosto 
facile). 

Il punteggio finale, tramite un'espres- 
sione matematica (riga 10*0), tiene con- 
to delle righe di labirinto portate a termi- 
ne, del tempo impiegato e del livello di 
difficoltà scelto (più difficile = più pun- 
ti). Tn caso di missione compiuta (20 ri- 
ghe) viene aggiunto un bonus di 500 
punti. 
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1 A$C0)-”V* : ASCD-’V”: A$CB)-CH 
R$C3B) : PR INTAS C RMD C0)*10/3) ; 
:GOTO 1 


100 REM IMPARIAMO A PROGRAMMARE 
110 REM GLI SPRITE COL C-64 
115 : 

500 FOR I -B3E IO 095 : POKE I , 0 : NE 
XT: PE3KE E040 , 13 : U-5304B 
505 POKE 038, 190 : LU-3 
510 PR I NTCHRS C 1 47 1 ; TABC3CVLI R 

Z C M 

515 PRINTCHRSC1S) ;CHR$C1B) ” 

” : REM 

07 SPAZI 

517 PRINTCHRSC1B) ;CHRSC3E) ; TABC 
SS) ; CHRSC 30) 

510 IF Eli -00 THEN PDKE 19B,0:END 

5E0 PRINTCHRSC 1B) ; CHRSC3B) ; CHRSC 
146 ) ; : FL-0 

530 NU-INTCRNDC 1 >*LU) : FL-FL+NU+1 
540 IF FL<S5 THEN PRI NTCHRS C 005 . 

S+RN0C1 )) ; SPCCNU) -.GOTO 530 
550 PRINT TABCB5) ; CHRSCE05 . 5+RND 
Cl)) ;CHRSC 1B) CHRSC 3B) 

560 PDKE U+El.l 
570 X-134: Y-60 

5B0 PDKE U , X : POKE U+l , Y : J-FEEKCU 
+31):F0R 1-1 TO 10 : NEXT 
5B5 IF PEEKCU+315-1 THEN FOR 1-1 
TD 500: NEXT: GOTO 570 
590 IF Y>-75+0*DI THEN DI-DI + l.-G 
QTO 51B 

600 IF PEEK C 197) — 10 THEN X-X-liY 
-Y+l : GDTG SB0 

610 IF PEEK C 197) -00 THEN X-X+1:Y 
-Y+l ; GOTO 5B0 

BEO IF PEEKC 197)-9 THEN X-X~1:Y- 
Y-l : GOTO 5B0 

630 IF PEEKC 197)-17 THEN X-X+ì : Y 
-Y-IjGDTD 590 
640 Gaia sa© 


100 REM 
110 REM 
100 REM 
130 : 


IMPARIAMO A 
SOFISTICARE 
I PROGRAMMI 


500 


505 

506 


50B 


513 


514 


515 


516 


517 

51B 

5E0 

530 

540 

550 


560 

570 

500 

SBE 

503 

5B5 


590 


500 


610 


FOR I-B30 TO B95 : POKE I , 0 : NE 
XT : POKE 0040, 13: U-5304B: S-54 
070 

POKE B30, 190 

FOR 1-0 TO E4 : POKE S+I,0:NEX 
T : POKE 9+6 ,040: POKE S+04,15: 
POKE 5, 40: GOTO 513 
POKE S+l , 50+RNDC D : POKE S+4, 
17: FOR ZX-0 TO 30: NEXT; POKE 
S+4 ,16: RETURN 

POKE 53001 , 11 : POKE 53000,0:? 
R I NTCHRS C 1 47 )CHR$ C 159 ) ; CHRSC 
17); 

INPUT "LI DELLO DI DIFFICOLTA 
' 1<D) 5CF) " ; LU: I F CLU<1) OR 
CLU>5) THEN LU-3 
GOSUE S0B: PR I NTCHRS C 147 );CHR 
$C 150) ; CHRSC 18) ; 

GOSUB 50B: PRINT "TASTI : -Ul R 

Z C CHRSC 146) ; ” 

-TEMPO:- 1 ’ 

PRINTCHRSC 1B) ; CHRSC 35) ; TABC 
06) ; CHRSC 30) : TIS- ”000000" 

IF 01-00 THEN AS-TIS:DI-DI-1 
: GOTO 1000 

PRINTCHRSC 1B) ; CHRSC3B) ;CHRSC 
146) ; : FL-0 

NU-INTCRNDC 1 )*LU) : FL-FL+NU+1 
IF FL<05 THEN PRINTCHRSC005 . 
5+RND CD); SPC C NU ) : GOTO 530 
PRINT TABC E5) ; CHRSC005 . 5+RND 
CD) ; CHRSC 16) CHRSC 30)CHR$C 14 
6 ); 

PDKE U+Bl , 1 

X- INI C RNDC 1 )*B40 ) : Y-60 
PDKE U , X : PDKE U+ 1 , Y : J-PEEK CU 
+31 ) 

PRINT TABC 30) ; RIGHTSCTIS , 4) • 
CHRSC 145) 

IF TI$> -”000500” THEN E000 
IF PEEKCU+3D-1 THEN GDSUB 5 
0B : FOR 1-1 TO 500: NEXT: GOTO 
570 

IF Y>«75+8*DI THEN 0I-DI+1:F 
RINT : FDR G-l TO 10: GOSUB 500 
: NEXT: GOTO SlB 

IF PEEKC 197)“1B THEN X-X-1:Y 
-Y+l; GOTO 5B0 

IF PEEKC 1975-00 THEN X-X+1:Y 
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620 

630 

640 

1000 

1010 

1020 

1030 

1040 


”Y+1 : GOTO 500 

IF PEEKC1971-9 THEN X-X-l : Y- 
Y-l : GOTO 500 

IF PEEKC1S71-17 THEN X-X+1:Y 
“Y-l : GOTO 500 
GOTO 500 
PR INTCHRSt 147) 

PRINT" ECCEZIONALE! ! ! SEI US 
CITO DAL” 

PRINT" LABIRINTO!!!! 

pi 

PRINT: PRINT: PRINT: BN-500 
PRINT”, , PUNTI : ; 600-UALCAS) 
+30*0 I +BN-LU*100 : PR I NT : PR I NT 


1050 PRINT” ANCORA? (PREMI UN TAS 
TO) ” : POKE 1SB, 0: UÀ IT 10B,1:G 
OSUB 500: POKE 100,0: RUN 

2000 AS“T I $ : GOSUB 50B : PR I NTCHRSC 1 
47) , 

2010 PRINT” IL TEMPO E’ TERMINATO 

it 

2020 PRINT” RESTERAI PER SEMPRE N 
EL LABIRINTO”; PRINT: PRINT: PR 
INT : GOTO 1040 

3000 RE(1 BY MAURIZIO DELL'ABATE 
3100 REM SOLO PER C64 - TASTI W 
Z R C 


Prima di scegliere 

un computer , leggi 
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QUALSIASI COMPUTER 


Giochiamo in borsa 


Un 

gioco-simulazione 
per tre o più 
partecipanti. Un 
passatempo 
“intelligente" per 
sfruttare al meglio le 
possibilità del tuo 
Commodore. 


di Flavio Moliimri 



G iocare iti borsa, si dice proprio così: 
nonostante il giro d'affari di migliaia di 
miliardi (tra cui, forse, un po’ dei nostri 
soldi, direttamente o indirettamente), 
nel linguaggio comune si assoda al termi- 
ne "borsa” la parola "gioco". 

In effetti gli ingredienti del gioco ci 
sono tutti: sono necessari abilità, fortuna 
e piacere del rischio, stando airimmagi- 
ne offerta da certi film sul mondo 
finanziario. 

Nella pratica le cose vanno un po' di- 
versamente. Oltre alle doti menzionate, 
sono in dispensabili denaro, (molto... si 
sa: soldi chiamano soldi), grande prepa- 
razione su di tutto un po’: economia, 
politica, mondo del lavoro e altro. Infi- 
ne, come per ogni gioco d’azzardo che si 
rispetti, bisogna anche saper barare. 
Tamponante è non farsi scoprire... (non 
prendetela come un'istigazione a delin- 
quere: sono solo banali considerazioni 
che saltano alla mente sfogliando qua e là 
i giornali). 

Giocare simulando 

Da sempre l'uomo ha desiderato rico- 


prire ruoli diversi da quelli offerti dalla 
vita quotidiana e in genere le proprie 
ambizioni sono rivolte verso quei perso- 
naggi cosiddetti "di potere". Da questo 
bisogno sono nati anche i giochi di simu- 
lazione: desiderio di potenza, competi- 
zione, piacere di misurarsi in situazioni 
insolite. Tutte queste componenti si in- 
trecciano e si manifestano in gran parte 
dei nostri passatempi preferiti, 

Alcuni hanno origini antichissime, co- 
me i giochi di guerra (gli scacchi ne sono 
r esempio più sofisticato), altri sono re- 
centi e il più famoso è forse Monopoli, 

L'invenzione del calcolatore ha porta- 
to una venuta di nuove idee iti questo 
ramo della scienza ricreativa. Grazie alla 
capacità di calcolo, ù possibile costruire 
modelli che si avvicinano sempre piu alla 
realtà, con applicazioni oggi diventate 
insostituibili: simulazioni di volo, previ- 
sioni del tempo, economìa.., e, per fini- 
re, giochi, argomento più frivolo, ma per 
questo non meno importante. 

Il programma che vi presentiamo è ap 
punto un esempio di gioco -simulazione 
che, pur essendo molto semplice e linea- 


re nella sua impostazione, dà una valida 
indicazione su come costruire un model- 
lo matematico c applicarlo a un gioco. 


Computer e giochi di società 

Con respandersi del fenomeno home 
computer, sì è avuta parallelamente la 
proliferazione di tutta una serie giochi, 
diverbi dai video- games tradizionali, che 
purtroppo sono sovente una bruna copia 
dei classici passatempi esistenti prima 
dell'avvento dell'era informatica 

Ottimi sono i programmi per giocare a 
scacchi, discreti quelli che simulano il 
tavolo da biliardo, cosi i programmi per il 
poker. Forse è solo un retaggio da cultu- 
ra pre informatica, ma il nostro parere è 
che un programma, anche se ben fatto, 
non potrà mai rendere l'atmosfera di un 
vero tavolo da gioco: il tappeto verde, i( 
rituale che accompagna la visione delle 
carte (spillare, in gergo pokeristieo). l'a- 
ria fumosa e irrespirabile, il bicchiere di 
liquore... Senza contare che è tutta 
u n'ali ra cosa giocare con dei soldi veri! 
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Ritornando a fare ima personalissima 
classifica sui giochi di società, il fondo lo 
si raggiunge con i programmi del tipo 
tombola, roulette esìmili. 

Questi sono quanto di più noioso si 
possa fare con un computer, dato che 
tutto il fascino tipico di questi giochi va a 
farsi benedire! Il ritrovarsi in famiglia, o 
con gli amici, le battute di chi tiene il 
banco (di solito il più brillante della com- 
briccola), il contatto fisico con le persone 
nonché gli oggetti facenti parte del gioco: 
bottoni, fagioli, carte ., con tutto il di- 
sordine e l'allegria che ne derivano. 

Bastu un po' di fantasia 

Il programma Borsa non ha ceno la 
pretesa di essere il top dei giochi per 
computer, ma dà un’idea di come sfrut- 
tarne in maniera intelligente le enormi 
potenzialità, senza ridurlo al mero ruolo 
di distributore di carte o dì visualizzatore 
di una scacchiera. 

L'idea è questa: prendiamo spunto da 
una situazione reale, la borsa, e faccia- 
mone un modello: compra/vendita di ti- 
toli azionari, tendenza delle quotazioni a 
salire o scendere a seconda della richie- 
sta, andamento del mercato. I giocatori 
dovranno fare la parte di ipotetiche, 
quanto improbabili, società finanziarie, 
mentre al computer è demandato il com- 
pito che meglio si addice a una macchina 
del suo genere: elaborazione dati e ag- 
giornamento del listino. La tastiera, da 
sola, conferisce tra l'altro quell 'aria di 
"professionalità’’ necessaria ormai in 
una qualsiasi attività finanziaria. 

Abbiamo pensato che il numero otti- 
male di partecipanti tosse tre: ci si può 
dividere in tre squadre e, in generale, 
quanti più siete, tanto più iì gioco sarà 
movimentato e divertente, il perchè non 
è possibile giocare in due squadre sarà 
detto più avanti, 

Spiegazione del gioco 

Come già anticipato, ci si deve divide- 
re in tre squadre II listino di borsa con- 


tiene otto tìtoli in tutto, un giusto com- 
promesso tra il numero effettivo riscon- 
trabile realmente in borsa e considera- 
zioni di tipo pratico. 

La prima fase consiste nella scelta del 
livello di difficoltà (1 oppure 2), del qua- 
le parleremo più avanti, e nella “codifi- 
ca" dei titoli. 

Per meglio chiarirne le modalità e gli 
scopi, riportiamo un esempio di output 
che vale anche come verifica di una cor- 
retta digitazione del listato. 

Codifica dei titoli squadra 1 
FIAT? 

COMMODORE ? 

ORO? 

SYSTEMS ? (un po + di pubblicità non 
guasta...) 

■ ■-*4 9 + 14 

Voi rispondete a ciascuna domanda 
posta con nomi scelti a piacere e tali, 
comunque, da confondere in seguito le 
idee alle squadre avversarie (primo ri- 
quadro in alto di figura !), come ad 
esempio: 

PIPPO 

ENEL 

ORNELLA 

TAVOLO 


Le altre squadre, naturalmente, non 
dovranno vedere quanto state scrivendo, 
altrimenti, come vedremo dopo, sarebbe 
tutto inutile. Per impedire che ciò avven- 
ga, decidete voi il sistema: si proibisce 
alle altre squadre, durante questa prima 
fase, di avvicinarsi a meno di due metri 
dalla consolle; si cerca di coprire col pro- 
prio corpo il video: si digitano in betta i 
nomi-codice; si cambia colore al cursore 
rendendolo eguale al fondo,.. 

Durante le successive fasi normali di 
compra /vendita (in cui cadono, natural- 
mente, le proibizioni di cui sopra) se, per 
ipotesi, volete comprare 1000 azioni del- 
la Fìat, batterete: 

COMPRI ? PIPPO 
QUANTITÀ’ ? 1000 

a patto; ovviamente, che abbiate associa- 
to ai titoli Fiat il nome PIPPO. Lo scopo 
di questa operazione è di rendere più 
ardua l'identificazione dei vostri movi- 
menti da parte degli avversari. 

Ciò succede anche nella realtà: apposi- 
te società operano per conto terzi, per 
non rendere pubblico il nome di chi sta 
sotto determinate manovre. 
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Naturalmente il programma non vuole 
essere cosi ambizioso: stiamo costruendo 
un gioco e per renderlo più interessante 
non è il caso di tirare in ballo migliaia di 
variabili. Due semplici vettori (un valore 
per ogni tìtolo) vanno bene allo scopo, 
Questi sono: “R” e “G*\ 

R() è un interruttore a tre stati: 

=0 titolo stazionario; 

=1 in ribasso; 

=2 in ascesa. 

C() è numero di giorni del perdurare 
dello stato di crisi o ripresa. 

Questi elementari artifizi rendono 
molto più problema fica per gli avversari 
(e anche per voi!) r interpretazione del 
listino di borsa. Per distinguere le varia- 
zioni casuali generate dal computer dalle 
oscillazioni prodotte dalla compra/ 
vendita, sarà necessario un maggior in- 
tuito e anche un pizzico di fortuna in più: 
optate per il livello 1 se volete un gioco 
razionale, privo di fattori imprevisti, al- 
trimenti per il livello 2 dove sono richie- 
ste maggiori abilità e fortuna. 


Input/output 

Durante la compra/vendita il compu- 
ter vi chiederà: 

COMPRI 

VENDI 

FINE 

e sarà necessario premere i tasti 
“V" oppure “F’\ a seconda di ciò che 
volete fare. A turno ogni squadra si avvi- 
cenda sulla tastiera, per un totale massi- 
mo di quattro "movimenti” (acquisti o 
vendite) per volta. E* superfluo precisare 
che potete comprare solo se disponete 
del liquido necessario, o vendere se ef- 
fettivamente avete azioni da vendere. Ir 
caso contrario il computer vi avviserà 
del Terrore e tale messaggio potrà esser di 
aiuto per Te squadre avversarie. 

Finite le contrattazioni, il ciclo si 
ripete, 

La conclusione della partita è a vostra 
discrezione: ad esempio potete stabilire 
ìn partenza un limite di tempo: vincerà 
chi allo scadere dei 90 minuti di gioco 
possiede il capitale più consistente. 



Figura 1 - Listino di borea. La affiato possono txm prera o vendere, usando al posto dot nome 
originate un codice scelto all'Inizio dal gioco; io scopo è di rendere inaccessibili per quanto possibile, le 
informazioni n^jardantt te azioni In proprio possesso Intormaziooi sugli eventuali acquisti o vendite, si 
possono trarre analizzando l'andamento dette quotazioni. Questo pero è compiicelo daJ tatto crie i 
movimenti sono eseguili da tre squadre contemporaneamente ed flettono {nel ca» del livello 2) 
fluttuazioni casuali che simularlo l'andamento reato dal mercato, non sempre legatosi fattori di compre/ 
vendita. 

L'abilità dei giocatori sta neU’jrtefpretere te osculazioni dei prezzi e distinguere guaite generate dai 
computer da quatte causate dall'acquisto o cessione di titoli. Seppur nei modello si sia cercato per 
quanto poasteite di spirarsi aite raattà. ai deve -assumere cria il computer abbia te funzioni di tornitore/ 
acquisitore di azioni, con una dtepontoMitì praticamente inimitate di titoli e danaro (Ipotest «ndentement» 
non riscontrabile nette realtà). 
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2 
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3 

ORO 

ORNELlA 

TELEFONO 

1 
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Figura 2 -Esempio d'uso di uria tàbefls a due dimensioni. Pw necessità di gioco, ogni tifato deveesswe 
codificato da ciascuna delie squadre partecipami (per comodità, è meglio neorrwe a nomi oomuni r più 
' adii da ricordare), La cornspondenza oodtoe-titob e gestita con una matrice e due india, il primo dei 
quali purrterà ai numero del titolo e il secondo al numero della squadra. 

Nel programma te “parate - * sono memorizzato nel vettore L5S{20.3) te Cui dtneiteioni massima, 
stabilite in partenze da un hstruzione DIM. sono, «t più. 20 titoli (nel programma se ne utilizzano solo B) 
per 3 squadre 

Dato che è possibile considerare anche te zero come indir», nella cotenna 0 memorizziamo il nome 
effettiva del litote, 


Note per gli utenti di Vk-20 

Il programma gira senza problemi an- 
che sut più piccolo della famiglia Com- 
modore, purché dotato di un’espansione 
di memoria. In un unico caso, nella pre- 
sentazione del listino, si avrà qualche 
“sbavatura' nella visualizzazione di al- 
cuni valori. Questo per i noti problemi di 
dimensioni dello schermo, che per il Vie- 
20 sono notevolmente ridotti. Interveni- 
te sulla sezione di programma STAMPA 
LISI INO per far incolonnare in maniera 
più leggibile i numeri. 

S uggerì ment ì 

All'inizio del listato compare una serk 
di variabili, intervenendo sulle quali si 
può modificare, anche in maniera so- 
stanziale, l’andamento del gioco. 

I valori impostati sono quelli che, do- 
po alcune prove, risultavano i migliori e 
che più si avvicinavano a un modello rea- 
le, Potete comunque modificarti, al fine 
di ottenere quello che più si avvicina a 
vostri gusti personali. Attenzione però a 


non immettere numeri “sballati”, altri- 
menti vi saranno tìtoli che impazziscono, 
con quotazioni che salgono alle stelle o 
che scendono in picchiata verso lo zero. 

Questo è il tipo di intervento più sem- 
plice, In un secondo tempo, per dare un 
pizzico di realismo in più* potete far 
comparire una schermata contenente 
brevi note sull'andamento dei titoli (un 
piccolo notiziario di borsa). Un confron- 
to tra le variabili: 

QZ(titoloJ>) quotaz. precedente 
QZ(titok>,Ì) quotaz. attuale 

fornirà le inforni azioni necessarie. 

Se ancora non siete contenti, ma que- 
sto è lavoro per i più esperti, rendete più 
realistica l’oscillazione delle quotazioni, 
diversificando l'ampiezza e la durata dei 
periodi di crisi o ascesa {movimenti del 
mercato). 

Fermiamoci qui. Quello che più conta 
è la fantasia. Anche saper programmare 
è importante, ma questo non è un pro- 
blema: il Basic si impara... 


Ricordate il giallo dell’estate scorsa 
che ha coinvolto le azioni BLI ovest? Ciò 
che appassionava e attirava la curiosità 
del vasto pubblico, consisteva nel fatto 
che nessuno (?) sapeva chi stava effetti- 
vamente rastrellando le azioni della hol- 
ding milanese. Il malcapitato Carlo Bo- 
nomia che ne era il maggiore azionista, 
non sapeva più che pesci pigliare... Del 
resto, avrete sicuramente notato, in 
qualche servizio televisivo, che quasi 
sempre gli agenti di borsa comunicano 
tra loro grazie a strani segni, spesso mol- 
to buffi e risibili. 

Assegnare un nome di fantasia ai titoli 
corrisponde* quindi, al comunicare al 
computer, mediante "segni” strani, la 
vostra intenzione di acquistare o vendere 
detrminafi titoli senza che gli altri capi- 
scano i vostri movimenti, 

Dunque, tirando le somme, è bene fa- 
re le operazioni in modo avveduto e cer- 
care di scoprire le proprie carte il meno 
possibile, affinchè gli avversari non ab- 
biano a trarre vantaggi dai nostri 
movimenti. 

Ovviamente sarà compito vostro ricor- 
dare che: 

PIPPO = FIAT 
ENEL « COMMODORE 

■ ■ * a + •* i « + 

oppure trascrivere il tutto su un foglio di 
carta (da custodire gelosamente ,. ), 

Analogamente il compito degli avversari 
consisterà anche nello scoprire il codice 
impostato dagli altri, in modo da ade- 
guarsi con intelligenza alle varie 
operazioni. 

Terminata questa fase, comincia il gio- 
co vero e proprio. 

La prima schermata {secondo riqua- 
dro di figura 1) presenta il listino con i 
titoli, le due quotazioni del giorno prece- 
dente e Podiema. Eventuali differenze 
tra le due cifre vanno studiate attenta- 
mente, perchè soltanto da queste (oltre 
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che dal Fattività... spionistica) potete 
avere utili informazioni e cercare di capi- 
re quanto e cosa hanno in mano i vostri 
a mici -ne mici. 

Forse è scontato, ma vale la pena pre- 
cisare che massicci acquisti di azioni ne 
faranno lievitare il valore. Net caso op- 
posto, il meccanismo è identico: vendere 
equivale a deprezzare il titolo. 

Quando comprate (o vendete), il prez- 
zo pagato non sarà quello che compare 
sut listino, ma una media che tiene conto 
delta domanda-offerta. 

Ecco perchè è necessario essere alme- 
no in tre a giocare. Supponiamo, infatti, 
di essere soltanto in due e che f in una fase 
di compravendita, decidiamo di acqui- 
stare 500 azioni della società Fiat che, 
per noi, è codificata in PIPPO, Poiché 
] avversario ha diritto, in questa fase del 
gioco, a controllare ciò che digitiamo, 
sarà sufficiente, per lui, non trattare i 
titoli PIPPO in questa transazione, ÀI 
termine della fase basterà rintracciare sul 
tabellone il titolo che ha incrementato il 
proprio valore per individuare il codice 
da noi assegnato a PIPPO. 

Se si è in tre, invece, non sarà cosi 
facile scoprirlo perchè le quotazioni del 
tabellone* sono influenzate da due squa- 
dre. E" come risolvere una sola equazio- 
ne con due incognite: le soluzioni sono 
infinite. 

L'andamento delle quotazioni, nel ca- 
so del livello di difficoltà 2, oltre a essere 
influenzato dalla richiesta, subisce anche 
il cosiddetto “umore'* del mercato. 

Nel programma sono inserite alcune 
variabili casuali che fanno oscillare, per 
periodi più o meno lunghi, i valori dì 
ciascun tìtolo. 

Queste sono da considerare come fat- 
tori imponderabili, dipendenti dalla 
somma e spesso dalla sinergia di tutti gli 
aspetti del mondo economico intemazio- 
nale, Nella realtà i cosiddetti fattori im- 
previsti possono essere della natura più 
varia: crisi politiche, scioperi dei minato- 
ri, restrizioni economiche... 




Figur* 3 - Calcolo delie Quotazioni. La quotazione corrente è calcolata in base alfa quotazione 
precèdente e a I numero delle azioni acquietate o vendute (movimenti) . Quest 1 ultimo valore influisce su 
un Indice che sartì rispettivamente usalo come fattore, se te azioni comprate sono maggiori di quelle 
vendute prezzo sale), oppure come divisore nel caso contrario (H prezzo scenda). 

Infine fattori casuali interverranno oppure no In relazione al divelto di gioco scelto. 
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100 REM BORSA 
110 : 

120 REH E I OCD/S IMULAZI ONE 
130 REM PER QUALSIASI COMPUTER 
140 : 

150 REM DI FLAUIO MOLINARI 
160 ; 

170 REM ***«»»•*****•*»•*•***** 
»» 

180 REM » INIZIO 

190 REM ******•**»•***•*•***«.•* 
* « 

200 NT“9 : REM N. TITOLI 
210 NS“3 : REM N. SQUADRE 
220 CP- 100000000: REM CAPITALE 
INIZIALE 

230 AP-S000 : REM NUMERO AZIONI 
I N I 2 I AL I 

240 M2- . 00B : REM INDICE ANDAMEN 
TO DEL MERCATO 
250 M5“ 1 : REM DEPREZZAMENTO 
260 : 

270 DIM LSSC20, 3) : REM TITOLI 
200 DIM LS( 20 , 4 1 : REM LISTINO A 
2IONI 

290 DIM LZf 20, 31 : REM MOUIMENTI 
300 DIM 0(20,31: REM POSIZIONI 
TITOLI 

310 DIM OZ(20 , 1 1 : REM OUOTAZIDN 
I 

320 DIM R( 20 1 : REM SUITCH DI IN 
IZIO OSCILLAZIONI 
330 DIM SC201 : REM GIORNI DI OS 
CI LLAZIDNE 
340 : 

350 REM CAPITALE INIZIALE 
360 LSCB0, 1 1-CF 
370 LSC20 , 21-CP 
300 LSC20.31-CP 
330 POR Q-l TO NT 
400 READ LS$(Q, 01 * REM TITOLO 
410 READ QZCQ.OiSQZCa, 11-QZ(Q,0 
1 : REM QUOTAZIONE INIZIALE 
420 LSOQ, 11-AP:LS(Q,21-AP:LSCQ, 
31-AP 
430 NEXT 
440 : 

450 DATA FIAT, 4530 
460 DATA COMMODORE , 6700 


470 DATA ORO, 19300 
400 DATA SYSTEMS, 5200 
490 DATA GEMINA, 1550 
500 DATA BUI TONI ,4020 
510 DATA PIRELLI ,3200 
520 DATA DOLLARI, 1950 
530 : 

540 REM *»••*•*•*•«•#*»•*****• 
mm 

550 REM * CODIFICA INIZIALE 

* 

560 REM * DEI TITOLI 

» 

570 REM *********»*«»**»«**♦#*# 

500 PRINTCHRSC 147 1SPC( 2501 : INPU 
T "LI DELLO C1/2)";LU 
590 IF LU< 1 OR LU> 2 THEN 500 
800 FDR Ql-1 TO NS 
610 PRINTCHRSC 1471 : REM CLEAR 
620 PR INI -CODI FICA DEI TITOLI S 
QUADRA”Q1 
630 FRI NT 
640 FOR Q2-1 TO NT 
650 PRINTLS$CQ2,01 ; :QS-”’* 

660 INPUT QS:IF QS-"” THEN 650 
670 LSSCQ2.Q1 1-OS 
600 NEXT 
690 : 

700 REM DISTRIBUZIONE CASUALE 
TITOLI 

710 FOR Q-l TO NT: QCQ, Qll-0: NEX 
T 

720 FOR Q-l TO NT 
730 RN- INT ( RNDC 1 )*NT 1+ 1 
740 IF Q(RN,Q11<>0 THEN 730 
750 Q(RN, Oli -Q: NEXT 
760 PRINT : PRINT 

770 GOSUB 2220: REM PREMI <RETU 
RN> 

700 NEXT 
790 : 

B00 REn *********************** 
*m 

B10 REM * COMPRO/UENDO 

* 

B 80 REH *•++*****+*+* ********** 

mm 


78 - Commodore Compoter Club 



GIOCHI 


030 

M1-LSC20, 1 Ì+LSC20, 25+LSC20, 

1810 

5P-Q2C51 , 1 }*QU: REM SPESA 


31+LSC19, 1 Ì+LSC 19,2 1 + LSC 19 , 

1220 

IF LT+SP>LSC20,Q1) THEN PRI 


3 > 


NT "NON HAI ABBASTANZA SOLDI 

0*0 

GOSUB 1540: REM QUOTAZIONI 


1”: GOSUB 2230: GOTO 950 

050 

IF LU-2 THEN GOSUB 1990: REM 

1830 

LSCS1 , Q1 1-L5CS1 , Q13+QU: REM 


MERCATO 


AGGIORNA LISTINO 

060 

GOSUB 1B00 : REM LISTINO 

1240 

LZCS1 , Q1 J-LZCSl , DI 5+QU:LT-L 

070 

GOSUB 2230: REM <RETURN> 


T+5P 

000 

REM AZZERA MOUI MENTI 

1850 

LS CSI , 4 1-LS CSI , 4 )-QU : REM M 

090 

FOR Q-l TO NT 


□UI MENTI 

3 00 

L5CQ,4>-0:NEXT 

1860 

GOTO 950 

910 

; 

1870 

; 

380 

FOR Ql-1 TO NS 

1800 

REM *»******•#***»»»•**»»•* 

930 

FOR Q-l TO NT : LZC D, 01 )— 0 : NE 


#1* 


XI 

1830 

REM * UENDO 

940 

CT“0 : LT-0 


* 

950 

CT-CT+1 : IF CT> 4 THEN 1440 

1300 

R£f-| ***********»***-#*****-** 

960 

PRINTCHRSC 147>"AZI0NI SQUAD 


mm 


RA”01 : PRINT 

1310 

INPUT "COSA UEND I “ ; LSS 

370 

FOR Q-l TO NT : Z-QCQ, Q1 1 

1380 

Sl-0 : FOR Q-l TO NT 

980 

PR INTLSSC Z , Gl D TABC 101LSC2 , 

1330 

IF LSS CQ , Q1 } -LSS THEN Sl-Q 


□ 1 1 

1340 

NEXT 

390 

NEXT 

1350 

IF 51-0 THEN PR I NT °T ITOLO I 

1000 

PRIMI 


NES I STENTE” ; GOSUB 88 30: GOTO 

1010 

PR1NT''C3 COMPRO" 


950 

1080 

PRINT"U) UENOO ” 

1 360 

PRINT 

1030 

PRINT ”F1 FINE” 

1370 

INPUT "QUANTITÀ ’ ” ; QU 

1040 

PRINT 

13B0 

SP-Q2CSI , 11*QU 

1050 

GET QS:IF □ S-”’’ THEN 1050 

1390 

IF LSCSI.QIKQU THEN PRINT" 

1060 

IF OS- ”C ” THEN 1140 


NON DISPONIBILE! GOSUB 223 

1070 

IF Q*-”U” THEN 1310 


0 : GOTO 950 

1 090 

IF Q$- ”F ” THEN 1440 

1400 

LSCS1 , Q11-LSCS1 ,Q1)-QU 

1030 

GOTO 1050 

1410 

LZCS1 ,Q13-LZCS1,Q1)-QU:LT-L 

1100 

■ 

» 


T-SP 

1110 

REM ««*«*****«****«**» 

1480 

LSC51 jHl-LSCSl.HI +QU 


mm 

1430 

□□TO 950 

1120 

REM * COMPRO 

1440 

GOSUB 8880 


* 

1450 

AZ-0 : FOR Q-l TO NT 

1130 

REM ********************* 4,( * 

1460 

AZ-A2+LSC Q , Q1 3 *QZC Q ,15: NEXT 


mm 

1470 

LS C 19 1 Q1 1 -AZ ; NEXT 

1140 

INPUT "COSA COMPRI" ; LSS 

1480 

GOTO 930 

1150 

SI -0 : FOR Q-l TO NT 

1490 

rii |.' 

n |» 

1160 

IF L5SCQ , Q1 l-LSS THEN Sl-Q 

1500 

mmmmmmmmmmmmmmmmmmmmmmm 

1170 

NEXT 


mm 

1180 

IF Sl-0 THEN FRI NT "TITOLO I 

1510 

REM * AGGIORNA QUOTAZIONI 


NES I STENTE” : GOSUB 2230: GOTO 


m 


950 

1580 

REM 

USB 

PRINT 


mm 

1800 

INPUT "QUANTI TA ; QU 

1530 

REM QUOTAZIONE DEL GIORNO 
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1540 

1550 

15G0 

1570 

1500 

1590 

1500 

1610 

1620 

1630 

1640 

1650 

1650 

1670 

1600 

1690 

1700 

1710 
1720 
1730 
1740 
1750 
1760 
1 770 


PRECEDENTE 

FOR Q-l TO NT 

Q2CD, 01-Q2CQ p 1 1 : NEXT 

m 

FOR 0-1 TO NT 

MU-LSCQ , 4) : REM MOVIMENTI 

IN-ABSCMU) / CAP*NS) 

IF MU<0 THEN QZCD, 15-INTCOZ 
CD, 1)*C1+IN) ) 

IF MU>0 THEN QZCQ, D-INTCDZ 
CO, 15/C1+IN)) 

IF MU-0 THEN QZCQ, 15-INTCQZ 
CO, 1)*M5) 

IF ABSCMU ) > 30 THEN QZCQ,1)“ 
1NTCDZCQ, 1 )*C2“M5) ) 

NEXT 

■ 

Efi 

REM DISPONIBILE IN AZIONI 
FOR Ql-1 TO NS:AZ-0:AS-0 
FOR D-l TO NT 
A2-AZ+LSCQ , 01 )*Q2C0 , 1 ) 
AS-AS+LZCD,Q1)*CD2CQ, D+02C 
Q, 0)5/2 
NEXT 

LSC 13, 01 )-A2 

L5C20 , Q1 5-LSC80, Q1)~AS 

NEXT 

RETURN 


REM ***•■ 


17B0 REM 


1730 REM 


STAMPA LISTINO 


1B00 

1010 

1820 

1B30 

1840 

1850 

1060 

1870 


1880 

1030 


TABC165LSC19.D) ; 

1900 PRINT TABC27 )LSC20,Q) + LSC 19 
,QD 

1910 NEXT 
1920 PRINT 
1930 RETURN 
1940 : 


1950 REM 
** 


1960 REM * MOUI MENTI DEL MERCATO 


1970 REM * 

m 


PSEUOOCASUALI 


1BB0 REM • •••'•••»‘* , ****** i,, **** ,,M, ‘* 


PRINTCHRSC 147) 

PRINT "TITOLO” TABC 10) “0U0TA 
2 0U0TA2” 

PRINT TABC10)”PREEEO ODIERN 
A” 

PRINT 

FOR 0-1 TO NT 

PRINTLSECO, 0) TABC9502C Q , 0) 
TABC1S5Q2CO, 1) 

NEXT 

PRINT: PRINT TABC 7) "LIQUIDO” 
TABC 10) "AZIONI ” TAB C 29 ) "TO 
TALE” 

FOR 0-1 TO NS ' 

PR I NT "SO ”0 : TABC55LSC20 , Q) ; 


1930 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 

2090 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2180 

2200 

•2210 

2220 

2230 

2240 

2250 


FOR Q-l TO NT 

IF RCQ5-0 THEN GOSUB 2050 :R 
CQ)-S:GCO)-G 

IF RC05-1 THEN GOSUB 2110 
IF RCQ5-2 THEN GOSUB 21S0 
NEXT: RETURN 

-f 

* 

RN-RNDC1) : S-0 

IF RN< . 1 THEN S-l 

IF RN< , 2 AND RN> . 1 THEN S-2 

G-INTCRNDCl)*10)+2: REM N. 

GIORNI DI UARI AZIONE 

RETURN 

QZCG, D-1NTCQZCQ, 1)*C1-M2)) 
GCD)“GC0)-1 : IF GCO5-0 THEN 
RCQ5-0 

RETURN 

* 

□ZCQ , 1 )- INTCQ2CQ , 1 )*C1+M2)) 
GCQ)-GCQ)-1 : IF GCQ5-0 THEN 
RCQ5-0 
RETURN 


REM **» PREMI <RETURN> *** 
PRINT”FINE SQUADRA ”01 
PRINT "PREMI <RETURN> PER CO 
NTINUARE" 

GET Q$ : I F 0SOCHRSC13) THEN 
2240 
RETURN 
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[1 Titilli!! 

jf<s% x. 


VENDITA PER CORRISPONDENZA 


GRUPPO CONTINUITÀ 

Fofrvtc senza le ì 2 baitene j aMO ricaricami* 
Confarne li runz-tpnamsnlt] del Vostro compiile» 
Commodore C6a o VIC ZO m assenni dii 'lorren 
te Durata di funzuafiamenlo SO mm trti Ricanta 
tramine diimematoré Commodore 


KIT ALLINEAMENTO TESTINA 

Compósto dai cacciavite nastro di ewtrtHkj e strumento di la 
ratyre Km monitor audio permette- il portello attintamente Lle- 
registTàton digitai» ine he con nastri commercia»' 


VELOCIZZATONE DI CARICAMENTO FLOPPY 

Cartndga con or insieme di uliMy rnsident 5. rp*- v p^r velocizzare 

11 dnve ne* Commodore 64 

INTERFACCIA RADIO 

indispensabile por rogiptrgrp con 
registratore Commodore modello 
’C?N l programmi speciali per 

radio 


CUFFIA PER 
COMMODO- 
RE C 64 

Leggerissima per 
matte l 'ascollo per 
gonfila del compu- 
ter evitando di dr- 
St'urtiare durarle : 
Qn&eh I 


COPIATORE PROGRAMMI 


DUPLICATORE CASSETTE 


Dispostilo hardurarr; oer ette-ttuar* copie di na 
sin protoni: a turbo ulihzz&nrfn due registratori 
Commodore o compatibili 


Indispensabite per realizzare selle copie con .n 
registra Idre nórmali? d un nastro proietto a co*" 
carcamenio iurtio 


Bus quadnslol 

Ari. CD tOQ 

L. 

55000 

nterf accia cassie 

Ari. CD lOt 

L. 

30.000 

Duplicatone cassette 

Art. CD 102 

L, 

30.000' 

Copido-rè programmi 

Art, CD 103 

L. 

30.000 

fnterfoccia radio 

Art. CD 104 

L. 

30.000 

Kit allineamento Sestina 

Art. CD 105 

Li 

47. oro 

Aì.menlelofe per G64 e VlC 20 

Gruppo continuiti {fornito senza 

Ari. CO 1DB 

L. 

45.000 

le 12 batterie e stilo ricaricatali) 

Pacco baitene {t2 siilo t.2 Voli 

Art CD 107 

L* 

66.000 

rlcartcabiii 

Commutatore antenna 

Art. CD 1 17 

L. 

52.000 

TVi'computer 

Ari. CD 1M 

L. 

9.500 

Tasto reset 

Ari CD 109 

L, 

5 500 

intarlacela Centronics 

Ari. CO 112 

L. 

104.000 

Espansione di memoria p « C t6 

Velocizzatore di caricamento 

Ari. CO 114 

L. 

158.000 

flop, 

Espansione -tji memoria per 

Art- CO 115 

L, 

49,000 

VIC 20 1 6K 

Ari. CD 1 16 

L. 

1 1 2.000 

Mocfutelore Executive 

Ari. CD 120 

L, 

72.000 

Panna ottica grafica 

Ari CD 121 

L. 

45 000 

Tavoletta grafica 

Ari. CO 130 

L. 

238.000 

Multi presa Con filtro - 2 pfè$è 

Art CD 140 

L, 

41 .000 

Culti a per Commodore C £4 

Stabiazzatore elemonico d 

Art. CD 150 

L. 

19.000 

canalone soo W 

Art. CD 160 

L. 

430.000 

Gruppo di cintinoli*! 60 VV 

Art. CD 1 70 

L, 

400.000 

Gruppo di tonlinuitè 200 V 
invernar 12 Vqil ec. 220 Voto ca 

Ari CD ITO 

L. 

502.000 

lfld Wall 

Ari GD 190 

L. 

307.000 

Cavo alimentazióne 

Cavo drive d slam punta 

Art CD 200 

L, 

4.600 

Commodore 

Art. CD 205 

L. 

S.500 

Prolunga per Joystick • mt 3 

Ari CD 210 

L, 

25-000 


Prolunga per cavo tv mt 3 

Ari. CD 215 

L. 

1 2.500 

Cavò audio - mi 6 

Ari. CD 220 

L. 

15.500 

Adattatore JoRtipik i'Atari e C64 ài 
C 16) 

Ari CD 225 

L. 

10,500 

Adattale registratore per C 16 

Ari, CD 226 

' L, 

19.50C 

Mascherina anlfariHasso 12" 

Art. CD SOO 

L. 

35.00Q 

Nastro inchiostralo per laJly - 
mt 00 

Ari. CD GTQ 

L. 

16.500 

Nastro inchiostrato per Telly - 
mi. i80 

Ari. CD 611 

L- 

16 500 

Mastio inchiostrato per Talty iDQO 
e HOrteywell 

Art. CD 012 

L. 

9.500 

Naglro inchróstr&to F>er 

Commodore MF*5 80 f 

Art CD 814 

L, 

13.000 

Nàsifd nYChFOStrato per 

Commodore MP$ 80-2 

Art. CD 616 

L. 

18.000 

Naslro inchiostrato per 
Commodoro MRS 603 

Ari. CD 618 

L 

19,500 

M ause pe r Commodore C 64 

Art. CD 660 

L„ 

240OO0 

Pacco caria “ottura facilitala 

24" x ir modulo da SOO logli con 
bordi a strappo 

i 

Art CD 030 

L. 

13,5<KP 

Supporlo stamparne porta certa m 
plexiglass "turno" normale 

Ari CD 660 

L, 

59OO0 

Supporto stampante porta carta ir 
pleKigl&sa " lume" - notar zèlo 

Ari. CD 670 

L. 

B0.O0O 

Floppy disk 5" singola Faccia 
doppie densità ' ODP" - 
coni 10 pezzi 

Ari CD 70O 

L. 

40,000 

Floppy di.sk fi" singola Taccia 
doppia densità "CaS" - 
coni. 10 pozzi 

Ari. CD 702 

L. 

38.000 

Floppy disk 5" singola faccia 
doppia derisila '’VERB-ATlM" 
coni. 10 pozzi 

Art. CD 704 

L. 

42.000 


Floppy disk 5" singole faccia 
doppia densità "DVSAN" - 
boni. 40 pezzi 

Ari CD 708 

L. 

68.000 

Nastri magnatici C 10 -digitali ■ 
poni 10 pezzi 

Ari CO 712 

L, 

20.000 

■Nastri magnetici C 16 digitali 

Ari. CD 714 

L. 

21.000 

Copritesi ora in oiexm ass per 

C84 CI 6 e VIC 20 

Ari. CD 750 

L. 

16.000 

Capotasi ws ir stoffa per 

C64 CI 6 e ViC 20 

Ari. CD 760 

L. 

10.500 

Vascherte portailoppy in pteKiglass 
per 4{> discti con chiave 

i 

Ari. CO 770 

L. 

30.000 

Vaschetta portalloppy in plexiglas 
per 90 dischi con chiave 

; 

An CD 760 

L. 

37,000 

Kit pulizia tesiine registratore 

Art. CD 81 ó 

L. 

13.500 

Kit pulizia disk dove 

An. CD 820 

L. 

26 000 

Kit pulizia, taglierà 

An CD 830 

L. 

16.500 

Foratore disk m plastica (per ubliz 
zar» la seconda lacera dei dischi) 

Art. CD 840 

L. 

1 0.000 

Foratóre disk rn metallo ' Tako" 

Ari CD 049 

L. 

14.000 

Joystick Spectravideo II 

Art CD 850 

L. 

27.000 

Joystick, a Microswlich 

Art CD 851 

L. 

52.500 

JdyShCk Sènza Fili coni unità 
riceverne (funziora a battona) 

Art CD 852 

L. 

98.000 

Joyslick per Commodore 16 
(Originale) 

Ari CD 1.30 

L. 
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Enciclopedia 

di 

a cura di Alessandro de Simone 

12300 MCD e mem 

(Per qualsiasi Commodore ) 

Programmi sui numeri primi, risoluzione di equazioni q 
ricerca di divisori sono già siati proposti su queste stesse 
pagine e probabilmente i più assidui lettori di Commodore 
Computer Club riconosceranno nella routine lo stesso pro- 
cedimento adottato in un listato di qualche numero addie- 
tro. Ve lo riproponiamo in una nuova veste, appunto come 
routine de 11' Enciclopedia, anche per dare ropportunità ai 
nuovi lettori di usufruire di questo interessante programma 
o (perchè no?!), di cogliere l'occasione per fare un po’ di 
“didattica" in maniera non troppo seriosa. 

La ricerca dei divisori comuni a due numeri (MCD) è 
spesso richiesta nella risoluzione di problemi matematici: il 
metodo più intuitivo, ma anche il più noioso, consiste nello 
scomporre entrambi i valori in fattori primi e poi moltiplica- 
re fra loro ì divisori che compaio™ da ambo le parti. Esiste 
però un’altra via, detta delle divisioni successive, molto più 
elegante e, soprattutto, più rapida, specialmente se i numcn 
in questione sono piuttosto grandi. 

Ora, senza annoiarvi troppo con spiegazioni di tipo scola- 
stico, vediamo in un esempio pratico come funziona Talgo 
ritmo usato nel programma. Supponiamo di voler determi- 
nare il massimo cornuti divisore di 714 e %ò: 

%ó/714=l 

resto: 252 

Prendiamo il più piccolo dei due valori (714) e il resto 
ottenuto e dividiamoli a loro volta: 

714/252=2 
resto: 210 

E ancora: 

252/210=1 
resto: 42 
210/42=5 
Testo: 0 



Il numero cercato è 42, vale a dire il primo divisore che 
fornisce un resto nullo. Non chiedeteci la ragione; il sistema 
funziona perfettamente anche senza saperne iì perchè! 

Poniamo fina al l'estemporanea lezione di algebra e venia 
mo alla nostra routine 

Le variabili Y1 e Y2 contengono i due numeri da elabora- 
re, mentre al “ritorno’' abbiamo: 

XM=MCD 

Con poca spesa possiamo calcolare anche il minimo co- 
mune multiplo: 

YM-mcm 

Ricordiamo che iì mem si ricava da: 
mcm= Y 1 * Y2/MCD 


Flavio Molìnari 


100 

REM 

ESEMPI 0 

□ * USO 


1 10 

rem 

mss i ria 

CDMUN 

DIVISORE 

115 

L 

rem 

MINIMO 

COMUNE 

DULTIpLO 

1E0 

RETI 

METODO 

DELLE 

DIUISIONI 


SUCCESS IUE 



130 

REM 

QUALSIASI Commodore 

140 

; 




150 

Yl-0 

: INPUT Jl 

PRIMO 

NLIMERD " ; Y 

150 

J, 

Y 5-0 

: INPUT ” 

SECONDO NUMERO*' 


;YB 




165 

□□SUB 1B300 



170 

1F X0$-”ERR ,ì 

THEN 

PRINT”NUf1 


ERI 

INTERI DIUERSI 

□A ZERO” 
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: PRINT ; GOTO 150 

100 PRINT 

190 PRINT "MASS IMO CDMUN □ I U I SOR 
E-” 5 XS 

500 PRTNT"MIN IMO COMUNE MULTIPE 
0~" ; Y0 

510 PRINT: PRINT-GOTO 150 

550 : 

15300 X0S= : I F Y1=0 OR Y5-0 THEN 
X0$-”ERR" : RETURN; REM NUnE 
RI <> DA 0 

15305 IF YIOINTCYID DR Y5< > INTC Y 
51 THEN X0$-”ERR” : RETURN : RE 
n NUMERI INTERI 
15310 X1“AB5CY1> : X5-ABSCY55 
15350 X3-INTCX1/X51 
15330 X4-X1-XS*X3 

15340 IF X4-0 THEN X5-X5 : Y0-ABS C Y 
1*Y5/X5> : RETURN 

15350 IF X5/X4-INTCX4/X5) THEN XS 
-X4: Y0-ABSCY1*Y5/X4) 

153B0 X1-X5: X5-X4: GOTO 15350 
15365 REM UARIABILI DI LAUQRD: X 


3, X4, X0S 

15370 REM INPUT: Y1 , Y5 

15375 REM OUTPUT: X5=MCD , Y0=MCM 

12339 REM M.C.D. E M.C.H. 


12400 Print using 

(Per qualsiavi Commodore) 

E un altro problema di trattamento dr numeri, rra stavo) 
(a la questione è squisitamente informatica, con questa 
routine, infatti, cercheremo di sopperire, almeno in parte, 
alla mancanza dell’istruzione PRINT USING nell'interpre- 
te Basic del Commodore 64 e Vie 20. 

Il listato gira in effetti su qualsiasi computerCommodore, 
ma se possedete un C- 16, un Plus/4 oppure un ( - 12H. non vi 
sarà di grande utilità, dato che l'istruzione che cercheremo 
di simulare esiste già all’interno del Basic 3.5 o del più 
potente Basic 7.0. 

Ai numerosi utenti del ( -64 si sarà presentata, almeno 
una volta, la necessità di visualizzare numeri in maniera 
ordinata e leggibile e di dover ricorrere, per raggiungere lo 
scopro, ad artefici che spesso non davano risultati 
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soddisfacenti. 

Infatti se scriviamo: 

10 PR1NT 23 

20 PRINT 123,12 
30 PRINT 9999 

dando il RUN avremo: 

23 

123,12 

9999 

Nel caso di programmi che prevedono L'output su video o 
su stampante, numero cosi disposti farebbero storcere il 
naso anche alla persona meno esigente in fatto di preziosi- 
smi estetici. 

Con La routine che segue potremmo definire il tipo dei 
dati (intero o decimale), le dimensioni dei campi e stampare 

11 numero assegnandolo alta variabile YO. Ad XOS dovrà 
corrispondere una stringa del tipo: 

XG$=*“ 

in cui il numero di caratteri “griglia” ( # ) posti a sinistra e a 
destra del punto definiscono (Ampiezza del campo numeri- 
co intero e decimale. Se il numero di questi ultimi è maggio 
re di quello definito nel campo, il valore sarà arrotondato: 


Se YO vale.... e XOS è. 

É , t .YDS risulta 

123.456 “ # 

” “123.46” 

78.9 “ # 

” “78,90” 

1234 “ # 

" 1234" 


Se il campo della pane intera è insufficiente a contenere il 
valore, viene stampato il simbolo della percentuale (%) in 
testa al numero, per avvertire che c’è un errore. Esempio: 

Y0^ 123.5X05^“ # 123,50” 

L'ultima opzione è il completamento a sinistra con zeri 
(una nota personale che si discosta un po' dal Basic micro 
soft), ottenìbile ponendo uno 0 in testa alla variabile XOS: 

Y0=3 X0$= M 0 # " YQS=“0003” 

Flivfo Mollnarl 

100 REM ESEMPIO D 1 USO 
110 REM PRINT USINO 
120 REM FORMATTAZIONE DATI NUM 
ERIGI 

130 REM QUALSIASI COMPUTER 


140 ; 

150 PRINT "ESEMP 1 0 1; STAMPA DI 
NUMERI INTERI E DON DECI MAL 
I " 

160 

170 REM 3 CIFRE PER LA PARTE N 
TERA E 2 PER LA PARTE DEC Ifl 
ALE 

100 Y0-23 ,45E; GOSUB 12400: PRINT 
Y0$ 

190 Y0-5G7 : GOSUB 12400: PRINT 

, Y035 

200 Y0-59.5 : GOSUB 12400: FRI NT 

Y0S 

201 Y0-.S : GOSUB 12400: PRINT 

Y0S 

225 : 

230 FRI NI "ESEMPIO 2: STAMPA CON 
COMPLETAMENTO DI ZERI A SI 
N1STRA 1 ’ 

240 XES*"©### 1 ' 

2S0 Y0-2423 : GOSUB 12400: PRINT 

Y0$ 

260 Y0-323* 22: GOSUB 12400: PRINT 

Y0$ 

270 Y0-22 : GOSUB 12400: PRINT 

Y0S- 
290 : 

SS9S END 

12400 X3-0 : X8-0 : XW-0 : X£“l : XD-1 
12405 XSS-” ” : POR XD»1 TD 

LENCX0S3 : XXS-MI DSC X0S , XQ ( 1 
3 : REM 9 SPA2I 

12410 IF XXS<>”. W AND AN 

D XXS<>"0" THEN X095~ ”ERR ” : R 
ETURN 

12412 IF XX$-”0” THEN X35-”000000 

000 ” 

12415 IF XXS<>“.“ AND XU-0 THEN X 
B-X8+1 : XD-XDMB 

12420 IF XXS-'L" THEN XW-1:G0TG 1 
2430 

12425 IF XUJ-1 THEN X9-X5+1 : XE-XE* 
10 

12430 NEXT 

12435 Y<B*INTCY0*XE+ .53/XE: Y00-STR 
SCY01 

1 2440 Y0S“M I DSC Y0$ , 2 , LEN C Y05 3-13 
12445 IF Y0-INTCY03 THEN Y0S-Y0S+ 
■\ 0 w 

12455 XZ-LENCSTRSC INTt Y03 3 3 : Y15-L 
EFT5C Y0S , XZ^l 3 : YSS-MIDS C Y05 
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1B540 RETURN 

10555 REM X0$, XU, XN, X3, XP, XI , XlS 

1E5G0 REM XU-UECCHIQ COLORE 

1P565 REM XN-NUOUO COLORE 

1 E599 REM CAMBIA COLORI 

12600 Text copy 

1 PerC-64, (16 t stampante MPS 803 u compatibili) 

U n’utility che non può mancare ai possessori della piccola 
stampante MPS 803. 

T Utto ciò che appare sul vìdeo a! momento della ^chiama- 
ta 1 ' dei sottoprogramma verrà copiato fedelmente su carta 
nel modo normale se la stringa X0$ contiene i caratteri 
"NOR*\ oppure in "allargato" (se XfJ$='*ALL”). 

Solo un piccolo neo: per ragioni tecniche il carattere di 
virgolette (*') è sostituito dal carattere apostrofo <shtft e 7) 
per evitare problemi nella stampa di eventuali simboli grafi- 
ci in reversc. 

Approfittiamo dell'occasione per vedere alcuni codici 
comando utilizzati nel programma e che per la MPS H(B 
corrispondono ad altrettanti modi di stampa: 

CHR$(I5 ): stampa con carattere normale; 

CHR$(145): seleziona il set maiuscolo/grafico, 

I due modi appena visi t sono impostati automaticamente 
al momento dell'accensione della stamparne Volendo è 
possibile cambiare il tipo di stampa con: 

CHR$(14): stampa allargata (doppia rispetto al normale); 
CHRSU7): seleziona il set maiuscolo/m in uscirlo. 

infine due codici che, per la stampante, hanno le medesime 
funzioni che sul video; 

CHRS(18 ): stampa in re verse; 

CHR$( 14b); disabilita il modo reverse. 

i a routine è facilmente adattabile al 016 In tal caso 
sostituire XV= 1(124 con XV =3072 (inizio memoria video). 
Inoltre nel ( -64 la locazione 53272 contiene l'indicazione 
dell 'attuale set di caratteri utilizzato, maiuscolo/grafico o 
maiuscolo/mìnuscolo: sostituitela con l'Indirizzo della loca- 
zione che net C-16 espleta le medesime funzioni, oppure 
lasciate le cose cosi come sono, dato che il programma 
funzionerà egualmente, con l’unica limitazione che la stam- 
pante utilizzerà solamente il set di caratteri impostato in 
precedenza, 

Flavio Moli nari 


100 REM ESEMPIO ITUSQ 
110 REM TEXT COPY 
160 REM PER CS4 □ C16 
130 REM STAMPANTE MPS 603 
136 ; 

134 REM PER C16: SOSTITUIRE XU 
-1064 CON XU-3076 
140 : 

1S0 XB35“ ”N0R " : REM CARATTERE NO 
RMALE 

160 REM X0S-”ALL” PER CARATTER 
E ALLARGATO 
170 GOSUB 16600 
100 END 

190 ; 

12600 XN”0 : CLOSE 4 : OPEN 4,4 

16605 IF X0$- ’*ALL ” THEN PRINT*t4,C 
HR$ ( 141 

12610 IF X0$“ J, NOR JI THEN PRINT*4,C 
HRSC151 

12615 XU-1024 : REM INIZIO MEMORIA 
UIDEO 

12620 IF PEEKC536761-21 THEN X2S- 
CHRSC1451 ; REM SET MAIUSCOL 
□/GRAFICO 

12625 IF PEEKC532761-23 THEN X2S- 
CHRSC 171 : REM SET MAIUSCOLO 
/MINUSCOLO 

16630 POR XX~0 IO S99 r Xl-PEEXC XX+ 
XU1 

16635 IF X 1*34 THEN Xl-39 

16640 IF Xl“32 OR Xl-160 THEN Yl* 
Y2 : GOTO 12650 

16645 Y1 ® ( XI AND 1271 OR CCX1 AND 

641*21 OR CC64-X1 AND 321* 

■ ■ 

E3 

1E650 Y1$-CHR$CY1) 

1EE55 IF X1>1£7 THEN Y1£-CHR$ C 18 3 
+Y1S+CHRSC 1463 

1E550 PR INT#4 , Yl$ ; 

12665 XN-XN+1;IF XN>39 THEN PRINT 
#4 ,X2$: XN-0 

18670 NEXT: CLOSE 4: RETURN 

18G00 REM XN, XU, Xlì , XBS, Y1 , X0S , Y 
1 $ 

18699 REM TEXT COPY MPS B03-COMP 
ATI BILI 
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, X2> 

124B0 Y1$-RIGHT$CXS$+Y1S, XB) 

12465 Y23>“LEFT$ C Y5$+ ”000000000" , X 
9+1 ) 

15470 IF X9-0 THEN YS$-"” 

12475 IF XD< INT C Y0 1 THEN Y0$-"V’+ 
MID$CY0$, 1 , LENCSTR$C INTCUAL 
CY0S1 ) )1-1 )+Y2S: RETURN 
12400 Y0$-Y1$+Y2S; RETURN 
12499 REM PRINT USINQ 


1 2500 Cambia colori 

(Per C -64) 

IL sottoprogramma, che permette di cambiare rapidamen- 
te i colori della pagina testo, può essere impiegato in tutte le 
applicazioni ove siano richiesti effetti particolari (ad esem- 
pio il lampeggio di porzioni di schermo o il cambio di uno 
sfondo), non ottenibili con i normali comandi Basic disponi- 
bili sul Commodore 64 Infatti ci si avvale dì una breve 
subroutine in linguaggio macchina, allocata nella parte bas- 
sa della memoria (a partire da 828), che lavora sulla memo- 
ria colore (55296-56295), 

Ponendo ad esempio: 

XV=(i (vecchio colore: nero) 

XN=8 (nuovo colore: rosso) 

tutti i caratteri sullo schermo di color nero, sempre che ne 
esistano, saranno cambiati istantaneamente (o quasi) in 
rosso. 

L'allocazione della routine avviene nel consueto modo, 
“inventato ’ per l'occasione per l'Enciclopedia di mutine: i 
codici in LM sono memorizzati nella variabile stringa X1S e 
letti per mezzo della funzione MIDS. 

Chi ha seguito la rubrica sin dalle prime puntate probabil- 
mente ne conoscerà la ragione, ma di tanto in tanto vale la 
pena ricordare che si è optalo per questa soluzione, per non 
creare problemi nel caso la routine venga utilizzata al Tinter- 
no di programmi che già contengono istruzioni READ a 
DATA. 

Le linee contenenti la parola “CANCELLARE" effet- 
tuano un controllo sull’esattezza dei valori della parte di 
programma in LM, dato che una sola cifra digitata in modo 
errato porterebbe molto probabilmente aH'inchiodamento 
del computer. Dopo aver fatto girare una volta il program- 
ma e averne verificato il corretto funzionamento, potete 
quindi cancellare le righe contenenti tale controllo. 

Flavio Moli ri ari 


100 REM ESEMPIO D’USO 
110 REM CAMBIA COLORI 
120 REM SOLO COMMODORE 64 
130 t 

140 PRINTCHRSC1475 : REM CLEAR S 
CREEN 

150 XX$-” PROUA ROUTINE CAMBIA 
COLORI " 

155 PRINTCHRSC 1501 ; REM GIALLO 
160 POR XX-1 TO 10: PRINTXXS; :NE 
XT 

170 PR I NTCHRSB C 144 ) : REM NERO 
1B0 FOR XX-1 TO 10;PRINTXXS; -NE 
XT 

£10 XU-0: XN-5: REM NERO IN UERD 
E 

£20 GOSUB 12500 
230 FOR XX-1 TD 500 r NEXT 
240 XU-7 ; XN-0 : REM GIALLO IN NE 
R0 

280 GOSUB 12500 
270 FOR XX-1 TO 500; NEXT 
230 XU-S; XN-7: REM UEROE IN GIÀ 
LLO 

300 GOSUB 12500 

310 FOR XX-1 TD 500: NEXT 

320 GOTO 210 

330 ; 

1 2500 X1S- ” 1 6300013325 1 1632 19" 
12505 X1S-X1S+ 11 133252162004160232 

TP 

15506 X1$-X1S+” 136177551041015501 

IT 

1550B X1S-X1S+ ”000500004169000145 

TI 

15510 X1S-X1S+ ”551195000500539196 

li 

15515 X1$-X1S+”55S50S50B534096” 
15515 X3-B:F0R Xl-1 TO LENCXISI S 
TEP 3: X3*X3+UALCMI DSCX1S, XI 
,315 : NEXT: REM CANCELLARE 
15550 IF X305311 THEN PRINT "ERRO 
RE NEI DATA”: END : REM CANC 
ELLARE 

15555 X5-0:FOR Xl-1 TO LENCX1S5 S 
TEP 3 : PQKE BEB+X5 , UAL( M I DSC 
Xl$ , XI ,35 5 : XB-XS+1 : NEXT 
15557 IF XU<0 DR XU>555 OR XN<0 0 
R XN>555 THEN Y0S-”ER” : RETU 
RN 

15530 POKE 846, XU: PQKE B50 P XN:SYS 

esa 
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12700 Fili memoria 

(Per C-64) 

I re esempi di utilizzo per un'utility dall'impiego univer- 
sale. I! suo funzionamento è molto semplice: la parte realiz- 
zata in LM svolge le medesime funzioni del seguente miero 
programma Basic (nel caso, ad esempio, della memoria 
video): 

90 INPUT Xft 
100 FOR 0=0 TO 999 
110 POKE 1024+Q.X0 
120 NEXT 

Come avrete intuito, la routine proposta serve a “riempi- 
re" una zona di memoria RAM con un determinato valore 
(compreso tra 0 e 255), a una velocità ovviamente di gran 
lunga superiore a quella tipica del Basic, 

Le opzioni sono quattro, selezionabili assegnando alla 
variabile stringa Xfl$ altrettanti nomi-codice: 

con X0$=* s VIDEO” lo schermo sarà riempito con il carat- 
tere che corrisponde al codice schermo XO (attenzione, è 
diverso dal codice ASCII, ad esempio la lettera A risponde 
al codice 1, mentre in ASCII vale 65: a riguardo consultate il 
manuale del computer dalla pagina 132); 
con XI I$= "COLOR” tutti ì caratteri presenti sullo schermo 
vengono “colorati” con il colore corrispondente a X0 
(0= nero, 1— bianco, eccetera); 

con XU$= "GRAFI " imposta la pagina grafica del primo 
banco di memoria (8192-16384 ) al valore XQ; 
con X0$—“GRAF2" come sopra per il secondo banco di 
memoria (24576-32764 ) , Può tornare utile nel caso si disegni 
in alta risoluzione: ponendo X0=0 verrà “pulita" Finterà 
pagina grafica, 

Flavio Molina ri 

100 REM ESEMPIO D’USO 

110 REM FILL MEMORIA 

1E0 REM SOLO COMMODORE G4 
130 ; 

140 REM ESEMPIO 1 : MEMORIA UID 

ED 

1S0 X0S-”UI DEO” sXe-ei: REM CARA 
TTERE " CDLLECT n 
160 GOSUB 10700 ; FOR 1*1 TD 1000 
: NEXT 
170 i 

1B0 REM ESEMPIO 0: MEMORIA COL 

ORE 


1S0 X0$*”COLQR 11 : X0*0 : REM NERO 
E00 GOSUB 10700; FOR 1-1 TD 1000 
: NEXT 
010 STOP 

000 REM ESEMPIO 3: HIRES BANCO 
1 1 0190 > 

030 POKE S3070 t PEEKC530703 OR 8 
040 POKE 53ES5 , PEEKC53B65) OR 3 
E 

060 X0$" M GRAF1 ” i X0-0 ; REM PULÌ 5 
CE PAGINA GRAFICA * 

£70 GOSUB 10700 ; FOR 1-1 TO *1000 
: NEXT 
BB0 : 

9959 END 

10700 X1S* " 1600001 6GE51 165BSB” 

1E705 X1$*X1$+” 145E5300000804S030 

H 

1 27 10 X1S-X1S+ "25420220B244096” 

12715 X3-0:FOR Xl-1 TO LENCX1S) S 
TEP 3:X3-X3-t-UAL(MI0SCXlS,XÌ 
, 31 1 : NEXT: REM CANCELLARE 

12720 IF X30 32B3 THEN PRINT”ERRO 
RE NEI DATA” : END : REM CANC 
ELLARE 

12725 X2-0:FOR Xl-1 TO LENCXlS) S 
TEP 3: POKE 020+X2 ,-UAL C MI DS C 
Xl$ , XI , 3 1 1 : X2-X2+1 : NEXT 

12727 IF X0<0 OR X0>255 THEN Y0S- 
"ER”: RETURN 

12730 IF X0$**”UIOEO” THEN POKE 25 
1,4: POKE 254,4 

12735 IF X0S- "COLOR" THEN POKE 25 
1,4: POKE 254,215 

12740 IF X0S- "GRAFI ” THEN POKE 25 
1,32: POKE 254,32 

12745 IF X0$— "GRAF2” THEN POKE 25 
1,32: POKE 254,36 

12750 POKE 252, X0: POKE 253,0: SYS8 
20 : RETURN 

12755 REM X0S , X0 , XI , X2 , X3 , X1S 

12760 .REM X0$ : ZONA MEMORIA, X0:U 
ALORE 

12733 REM FILL MEMORIA 


1 2800 Bordo in technicolor 

(Per C-64) 

L’idea non è completamente nuova, ma coloro che sono 
abituati a vedere il bordo dello schermo nel solito modo 
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Come realizzare l'enciclopedia e utilizzarla nei propri listati. 


JTm i lettori che hanno acquistalo per la prima volla questo numero tli {'ommoriint Computer t luh. illusi riamo qui di vergilo in 
breve, i vantaggi derivanti dalla raccolta proporla Questa, a pensarci bene, è la versione superiore della rubrica ! K ! Ci A t 
potrebbe anche denominarsi... “Un a schermata"! 

Oltre che utili per costituire un’enciclopedia, i brevissimi sottoprogrammi pubblicati mi ogni numero, sono ancht validissim 
strumenti di studio per coloro che desiderano approfondire le proprie conoscenze ilei Basic esami fi andò, senza tant;i particolar 
routine o insolite tecniche di programmazione 

• Dato che può esser “chiamata più di una volta nel corso di un programma, nessuna mutine contiene istruzioni del tipo HA 1 A 
oppure DIVI, allo scopo di non creare confusione col listalo principale 

• Nessuna routine può far riferimento ad altre routine dell' enciclopedia 

• Nessuna routine può contenere variabili "banali (A. AS, eccetera), ma solo variabili poco usate {XII. XK. Y0'> , eccetera) 

• Ogni routine deve apparire, per infero, sullo schermo del computer e consentire, proprio per questo motivi i di essere esaminai:! 
cornea mente 

• Ogni routine deve esser numerata secondo uno standard che ha la particolarità di esser ricordato facilmente: 


Righe 

XXYOt) Prima riga del sotloprogramma 

XXY89 Ultima riga utile del Miitoprogramnia 

XX Y90 REM Prima riga di spiegazioni 
XXY99 REM Nome della subroutme 

in cui XX sono due valori variabili da li) a bJ; Y è un carattere numerici) compreso trari c 

Qualsiasi subroutine, m altre parole, inizia con un numero, di cinque caratteri, che termina sempre con m La si essa subroufine. 
d altra parie, ha l'ultima riga numerata con l W. Digitando, ad esempio LISI 10HKKM<WI99 
si avrà la certezza di veder apparire sullo schermo, per intera, la routine il cui nome 'ù nova nella riga HtfW 

Prima di accedere alla routine, è necessario assegnare, alle variabili indicate con REM da riga XXY89 a XX YW. particolari valori 
per ri suo corretto funzionamento. Al “ritorno" una o più variabili conterranno il risultato dell eia boraz ione 

In questo modo, per esser piu chiari, è possibile simulare alcuni comandi di versioni Basic avanzale oppure, addirittura, creare 
nuove e inedite istruzioni Ad esempio, il comando: SOUND 1, SOCI, 500 

che. nel C-16. riproduce un suono di tonalità 800 tramite la voce I |ier la durata 500, potrebbe venir riprodurla. m un'ipoietica 
subroutme per il Commodore b4, con: Xl = l:X2=ftKI X3=500:GOSL'B 12400 
nell ipotesi, ovv iamente, che la routine in oggetto sìa allocata da riga 12400 a J24V9. 

I listati pubblicati girano su ogni computer, salvo dove indicato diversamente 

L ovvio che nel caso del Vac-20, (che, come è noto, ha uno scherniti di stili 50h caratteri), le subrettine ‘ universali funzionano 
corrali amente, ma non possono apparire per intero in una sola schermata 

Per quanto riguarda la digitazione, si tenga presente die sulla rivista, per motivi di chiarezza i comandi e le istruzioni Basic sono 
separati tra loro da spazi bianchi. Nel digitare le linee di programma, pertanto, è opportuno ignorarli altrimenti si rischia di non restare 
in una sola schermata Se, per esempio, leggete 

12100X1=34: X2 = SQRtX?) + LOCifX l) 
digitate nel modo seguènte 

Ì2lOtlXl=34:X2=SORÌX3)+LOGfXl} 

senza, cioè . aleuti carattere di separazione tra comandi ed istruzioni 


Contenuto 


asic sono 


{ ni la bora/ io ne dei lettori 


L.ìi un 1 1 abora t ione dei lettori è gradita, purché si pro\ 
veda a inviare almeno tre sottoprogrammi per volta, su 
nastro, disco oppure output di stampante T listati di 
routine che non rispettano lo standard adottato non 
potranno esser presi in considerazione. 

ì urti i lavori pubblicati verranno compensati con prò 
dotti delta Svstems Editoriale (cassette di programmi, 
libri, abbonamenti, copie arretrate, eccetera). 
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{monocromatico e con al massimo la possibiltà di cambiarne 
il colore), facendo girare questo programma resteranno 
piacevolmente sorpresi. 

Come tutti saprete, il video del Commodore 64 è suddivi- 
so in due zone ben distinte: una centrale, su cui scriviamo 
o disegnarne), e una cornice esterna, sulla quale è possibile, 
con i: comandi Basic, intervenire solamente sul colore (loca- 
zione 53280}. 

Grazie ai LM e a qualche “t rocchetto \ possiamo sfrutta- 
re anche questa zona di schermo, noti dico per scriverci 
sopra (bisognerebbe essere proprio dei maghi’), ma per 
ottenere insoliti effetti da inserire nei nostri programmi, per 
renderli più vivaci. 

Assegnando alla varcabile Xi)% la stringa ‘"COLOR", il 
bordo verrà suddiviso in numerose bande orizzontali, la cui 
altezza in dot (puntini elementari) è data dal valore assegna- 
to in precedenza alla variabile X0. 

Valori che esprimono potenze di due forniscono un’im- 
magine stabile (a parie un leggero sfarfallio). In tutti gli altri 
casi l'effetto è diverso: fate girare il breve programma dimo- 
strativo per rendervene conto. 

Per tornare alla normalità assegnate a X0$ una qualsiasi 
stringa diversa da “COLOR", 

Vediamo brevemente come è stato ottenuto questo sim- 
patico effetto. 

I! Commodore 64 dispone di particolari locazioni di me- 
moria che consentono di controllare la posizione del canno- 
ne elettronico (per intenderci è quello che visualizza le 
immagini sullo schermo). Le locazioni 53265 e 53266 (in 
esadccimale SDOll e SEMI 12) contengono il numero della 
riga in cui si trova il cannone in esame, informazione otteni- 
bile con un’operazione di lettura: PEEK(5326ó) o, in lin- 
guaggio macchina, con LDA SDO 12. 

Viceversa, scrivendo un valore {POKE 53266.X oppure 
S' : A SD012), non ne viene mutata la posizione, ma si mette 
in condizione il V1C II di programmare un mterrupt: nella 
nostra applicazione ogni volta che il fascio di elettroni si è 
spostato di OX pixel (nel programma demo XOtS) viene 
incrementata la locazione 53280 che, come visto in prece- 
denza, cambia il colore al bordo dello schermo suddividen- 
dolo in tante fasce oriizoniali di tonalità differenti. 

Poiché non è possibile dedicare, ne Ma presente rubrica, 
molte pagine alla descrizione di un solo programma, ricor- 
diamo che sul numero 18 di Commodore Computer Club 
Targomento viene trattato in maniera approfondita, com- 
preso il dìsassemblato delta routine in LM, 

Flavio Moli nari 

100 REfl ESEMPIO D>USD 

110 REH BORDO IN TECHNICOLOR 

150 REH SOLO PER COmODORE 64 


130 : 

1S0 X0S- "COLOR 11 ; X0*=B ; GDSUB 1BB0 
0 

160 FOR XX-1 TD 1000 : NEXT 
170 tGOSUB XBB 00 

160 : 

510 X0$- ,J COLOR”: X0“5: GDSUB 1E80 
0 

EE0 POR XX*1 IO 400: NEXT 
330 X0S^ " " : GOSUB 1E000 
240 : 

250 : 

9839 END 

12900 XI $>** ”168127141013220159 '* 
12B05 XÌS-X1S+ ”034 141020003169003 

n 

12810 X1$-X1$+ ”1410210031681 23141 

ìt 

12615 X1S-X1 $+”01 3220169001 141026 
12820 X1S-X1 $+"20817301 7208041127 

I* 

12825 X1$-X1$+” 141017208035173025 

M 

12830 X1$-X1$+ ”208041001208003075 

i» 

12B3S X1$~X1$+” 108254141025208173 

il 

12840 X1$-X1$+” 13300314 1032200230 

II 

12845 X1$-X1$+” 1330031731 34003024 

J» 

12850 X1$-X1$+" 105016141 134003141 

H 

12B55 X1S-X1S+ ”018200144227076040 
234" 

12B65 X3-0:FOR Xl-1 TO LENtXISl 5 
IEP 3: X3-X3+UALCniD$CXl$, XI 
,3)1: NEXT : REM CANCELLARE 
12070 IF X3O0124 IHEN PR 1 NT "ERRO 
RE NEI DATA”: END : REFI CANC 
ELLARE 

12075 X2-0:FDR Xl-1 TO LENCX1S) 5 
TEP 3 : POKE B28+X2, UALCIIIDSC 
Xl$ , XI , 3)1 : X2-X2+1 : NEXT 
12665 POKE 089 , X0 : I F X0$- "COLOR” 
THEN 12892 

12690 POKE 833, 49: POKE 839, 234: PO 
KE 840 ,240: POKE 855,9: POKE 
857,128 

12092 5YSB28 : POKE 53280 , 14 : RETURN 
12099 REH BORDO IN TECNICOLOR 
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1 2900 Scritta lampeggiante 

<Per qualsiasi Commodore) 

lì nome basta da solo per comprendere lo scopo di questa 
semplice subrettine, alla quale bisogna inviare t seguenti 
parametri: 

Xl$: frase che intendiamo far lampeggiare sul video. Il 
lampeggio è simulato alternando a Xl$ la stringa XS$, 
contenente spazi vuoti; 

XI e X2: tempo di permanenza e scomparsa del messaggio: 
X3: tipo di lampeggio: se X3=l in rever se, se X3< >1 
normale; 

X4: distanza del messaggio dal bordo sinistro del video. 

Per tornare al programma principale bisogna premere un 
tasto qualsiasi, che può essere controllato da IL utente trami- 
le XX$. Nei demo d’esempio il programma procede solo se 
viene premuto il tasto “Z”. 

Flavio Moli nari 


100 REM ESEMPIO D # US0 

110 REFI SCRITTA LAMPEGG I ANTE 

12® REM QUALSIASI COnhODQRE 


130 : 

140 XlS-'^PREni 2 * PER CONTINUA 
RE" 

150 X4-10iREM DISIANZA DAL MAR 
BINE SINISTRO 

160 Xl-500:Xe-300:REf1 CICLI DI 
RITARDO PER LAMPEGGIO E FA 
USA 

170 X3"l : REM TI PO LAMPEGGIO : R 
EU ERSE 

100 GOSUB 12800: IF XXSO^Z” T 
HEN 180 

1S0 : 

200 : 

9999 END 

12900 IF XX$<>”” THEN 12910 
12902 XSS-” ” : FOR XX-1 IO LENCX1SI 
: XS$-XSS+CHR$C32> :NEXT 
12905 IF X3-1 THEN X1S-CHRS C 103 +X 
1S+CHRSC 1463 

12910 FRI NTCHRS 1 1451 TABCX4)XSS:F 
OR XX-1 TO XI : MEXT 
12915 GEI XXS:IF XXS<> WW THEN REI 
URN 

12920 PR I NTCHRS C 145 ) TABCX4IX1® 
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Computer Table 

praticità, ordine, maneggevolezza 
nell utilizzo del vostro computer. 


DIMENSIONI mm 720 x 500 x 1000 h 
DISPONIBILI NELLE VERSIONI COLOR ROSSO, 

GIALLO. BLEU, NOCE E FRASSINO IN KIT DI MONTAGGIO 


E UN PRODOTTO: 

EVERGREEN 

VIA G. GALILEI, t/5 
2001QCORNAREDO (MILANO) 

Tei. 9362536 - 9364696 r 


slv» {fifa 
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15955 FOR XX-1 IO X5 : NEXT 
15330 GOTO 15310 
15932 : 

15990 REh Xl$r STRINGA LAHPEGGIAN 
TE 

15301 REM XI, X5: CICLI PAUSA-LAM 
PEGGIO 

15305 REM XXS: TASTO PREMUTO 
153BS REM X3-0: LAMPEGGIO NORMAL 
E 

15990 REM X3-1: LAMPEGGIO IN REU 
ERSE 

15399 REM SCRITTA LAMPEGGIANTE 


Elenco delle routine pubblicate 

Oui di seguilo viene riportato i'Lndice di tutte le routine 
finora pubblicate. Fra parentesi il numero di Commodore 
C omputer Club su cui sono apparse . 

63970 REM 50500 VISUALIZZA FILE (28) 

63971 REM 50400 LEGGE FILE RELATIVI (28) 

63972 REM 50300 SCRIVE SU FILE RELATIVI (28) 

63973 REM 50200 CREA FILE RELATIVI (28) 

63974 REM 50000 LEGGE BLOCCHI LIBERI (28) 

63975 REM 12200 NUMERI CONGRUI (28) 


63976 REM 12100 PROTEZIONE SOFTWARE 
(28)63977 REM 12000 KOALA (27) 

63978 REM 1190f) SCAMBIA PAGINA VIDEO (27) 
«979 REM 11800 SALVA RAM (27) 

63980 REM 1 1700 CALCOLATRICE (27) 

63981 REM 11600 SCOMPOSIZ. SILLABE (27) 

63982 REM 11500CAR.HI-RES (27) 

63983 REM 11400 ISTOGRAMMI (27) 

63984 REM 50100 ESAME DIRECTORY (26) 

63985 REM 11300 FU NZ.INV. IPERBOLICHE (26) 

63986 REM 11200 FUNZ.1NV. TRIGONOM. (26) 

63987 REM 11100 FUNZIONI INVERSE (26) 

63988 REM 11000 FUNZIONI IPERBOLICHE (26) 

63989 REM 10900 CONVERSIONE DEC ESA (26) 

63990 REM 10800 CONTROLLO DATA (25) 

63991 REM 10700 IMPULSI SONORI (25) 

63992 REM 10600 R EVERSE SCHERMO (25) 

63993 REM 10500 INPUT CONTROLLATO (25) 

63994 REM 10400 INCOLONNAMENTO VIRGOLA 
(25) 

63995 REM 50000 N. BLOCKS FREE(DISCO)(24) 

63996 REM 10300 INPUT & CONTR/DEFAULT (24) 

63997 REM 10200 ESTRAZ. PAROLA DA FRASE (24) 

63998 REM 10100 CAMBIA COL.BORDO/FONDO (24) 

63999 REM 10000 CORNICE POLICROMA (24) 


TI PIACEREBBE 



CREARE LEZIONI 
ESERCII O PROVE CON IL 
COMPUTER? 


REGISTRARE 

LE PRESTAZIONI DEI TUO* 
ALLIEVI? 


VERIFICARE 
L’EFFICACIA DELLA TUA 
LEZIONE? 


CON 

PROGREDISCO 

PROGREDISCO 

TI FARA’ 

PUOI FARLO! 

CAMBIARE IDEA! 


A.P.E. - VIA DANTE, 8 - 341 70 GORIZIA 

• TUTTO IN ITALIANO 

• 98 PAGINE VIDEO 

• GRAFICA E TESTO A COLORI 

• ARCHIVIO ALLIEVI 

• MESSAGGI SONORI E GRAFICI 

• CONTROLLI DI COERENZA 

• GIÀ’ DISPONIBILI UNITA’ DIDATTICHE 



SISTEMA 

AUTORE 


Xi. 

t» I 



COOP. A.P.E. VIA DANTE, 8 -34170 GORIZIA 

TEL. (0481) 34169 
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COMMODORE 64 


I filtri passivi 

di Piero Dell’Ort* 


hiunque conosca Pelei cronica di ba- 
se può comprendere le formule del lista- 
to, Per gli altri, rimane in risalto l’aspetto 
didattico del programma. 

Ecco comunque qualche cenno sui fil- 
tri e sul programma, I filtri sono quadri- 
poli che hanno la proprietà di lasciar pas- 
sare i segnali dì determinate frequenze e 
bloccare quelli delle altre. Vengono qui 
esaminati due tipi di filtri ‘il passa -basso il 
passa-atto. Questi, scelti del tipo a RC 
{ re s i ste n za-eondensatore ) , permetto no 
il passaggio del segnale, inalterato o qua- 
si, per tutte quelle frequenze che siano 
inferiori o superiori a una frequenza 
chiamata frequenza di taglio. 

Viene definita frequenza di taglio 
quella frequenza alla quale l’amplifica- 
zione si riduce della quantità di radice di 
due (0.707) rispetto al massimo segnale 
la cui ampiezza si considera unitaria per 
convenzione. 

La formula della frequenza di taglio è 
la seguente: 
ft=*l/ó.28*R*C 

La formula de U’ampli Stazione è di- 
versa da filtro a filtro: per il filtro passa- 
tisti è uguale a: 
A*I/SQR(l+(6.28*f*R*C)f2); 
mentre per il passa alto è: 

A = t/SQR(I+(W6.2H*PR*Q-t2)); 
dove f è la frequenza che varia; R e C 
sono i valori di resistenza e capacità inse- 
riti all’inizio. 


Come analizzare 
la curva di 
risposta di 
un filtro passivo . 



Come gira il programma 

I] programma, inserendo i valori di re- 
sistenza e capacità, permette di tracciare 
la curva di risposta del filtro in esame. 
Affinchè la curva sia davvero realistica, 
viene fatto un controllo sul valore della 
frequenza di taglio perchè il programma 
abbia un valore ragionevole di riferimen- 
to su cui disegnare. 

Essendo il grafico in alta risoluzione, 
non sì può sapere a priori a quale valore 
corrisponde il punto disegnato in quel 
momento. Tuttavia, premendo FI, Fese- 
euzione dei disegno viene sospesa, si tor- 
na alla pagina di testo e vengono visualiz- 
zati ì valori ‘'attuali" della frequenza e 
del segnale. Premendo di nuovo FI si 
torna alla pagina grafica e il disegno ri- 
prende il suo tracciamento. 

Attenzione 

Per far funzionare il programma è ne 
cessano caricare dapprima k routine 
grafiche di TOMA e lanciarle. Tali routi- 
ne sono state pubblicate sul N.I4 di 
C,C C. e sulla rivista su nastro Commo- 
dore Club N.4 

Quindi si carica il programma FILTRI 
e si dà il RUN. - 

A questo punto verrà chiesto di sce- 
gliere un tipo dì filtro, Si dovranno ora 
inserire ì valori dì resistenza e capacità, 
dopodiché non resta che osservare il 
tracciamento della curva e analizzarla. 
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100 REM ************************* 


1 10 REM * COMMODORE 64 * 
180 REM * * 

1 30 REM * F I LTR I PASSIVI * 
140 REM * * 

150 REM * DI PIERO DELL'OSTE * 


1 60 REM ************************* 

170 REM * CARICARE LE ROUTINE * 
180 REM * GRAFICHE DI TOMA * 

130 «-CLEAR 
1 35 DIM A < 1 ,80 > 

200 PR INTCHR* ( 147 ) : POKE 214,10 
210 PRIMI TAB( 10) "FILTRI PASSIVI" 
220 PR INTsPR INT: PRINTsPR INT 
230 PR I NT 11 1 ) PASSA BASSO "SPRINT 
240 PR I NT : PR I NT * £ ) PASSA ALTO" 

250 PR 1 NT! PR I NT s INPUT "QUALE’ IN 
260 PRINT CHR*< 147 ) ì IF N>£ THEN 

200 

270 INPUT "RESISTENZA (OHM)" )R 
280 INPUT "CONDENSATORE (NANOFARAD 

) *;c 

230 C=C* 1 E-3 

300 FT- 1/(6 . 28*R*C > 

310 IF N®2 THEN 460 
320 REM PASSA-BASSO 
330 IF FT< 1000 THEN PR INT”VALORE 
TROPPO BASSO PER UN F ILTRO PA 
SSA -BASSO * s GOTO 110 

340 IF FT > 1E6 THEN PR I1TT "FREQUE 
NZA TROPPO ELEVATA" .'GOTO 270 
350 F=0sP=l : X= - 1 58 : Y=40 s GOSUB 540 
360 A= l/SQR ( 1 +( (6.23*F*R*C )t2 ) ) 

370 Al =INT(A*100> sGOSUB 680 
380 IF F > 1E 1 THEN P=F/6 
330 IF F > 1 E2 THEN P=F/I2 
400 IP F > IE3 THEN P=F/18 
410 IF F > 1E4 THEN P=F/24 
420 IF F > 1E5 THEN P=F/30 
430 F=F+P s IF A< , £ THEN 630 
440 GOTO 360 
450 REM PASSA-ALTO 
460 IF FT >300 THEN PR INT’FREQUE 
NZA TROPPO ELEVATA "J GOTO £70 
470 IF FT< 10 THEN PR INT’FREQUEN 
ZA TROPPO BASSA": GOTO 270 
480 F=1 :P* 1 :X*-150:Y=40 : GOSUB 540 
430 A= l/SGR ( l + U/( (6.28*F*R*C)t2) ) 
) 


500 A 1 = INT (A* 100 ) : GOSUB 600 

510 IF F >300 THEN 630 

520 F=F+P 

530 GOTO 490 

540 POKE 53280 ,12 

550 «-GRAF 12,0 

560 «-COL OR I 

570 «-DRAW -160,-60,0,160,-60,0 
580 «-DRAW -150,-80,0,-150,80,0 
590 RETURN 
535 RETURN 

600 GET A*sIF A*=CHR*(133) THEN 
750 

605 X>i=0 

610 «-PLOT X,Y,0 

620 X=Xtl :Y=-60+Al sRETURN 

630 POKE 53280,11 

640 GET A*sIF A**‘" THEN 640 

650 «-TEXT 6, 14 SPRINT CHR*(147) 

660 PR 1NT"0RA PUOI FARE : " 

870 PR INT: PR INT" 1 ) DISEGNARE SOPRA 
LA PRECEDENTE* 

680 PR INT: PR IMT“2 ) DISEGNARE UNA S 
OLA CURVA " 

690 PR I NT : PR I NT “ 3 ) FINIRE" 


?m 

PR INT: INPUT “QUALE 

710 

IF 

M=3 

THEN 

END 

730 

IF 

M=£ 

THEN 

190 

730 

IF 

M“ 1 

THEN 

£00 


740 GOTO 700 

750 PRINTCHR*( 147) :«-TEXT 6,14 

755 PRINT*RES1STE:NZA="R 

756 PR INT" CAP AC I TA 1 = *C "NANOFARAD* 
760 PR INT : PR INT : PR INT TAB ( 10 ) "FREQ 

UENZA DI TAGLIO* 

770 PR INT: PR INT TAB ( 1 5 ) J INT (FT) ; " 
HZ " 

780 PR INT- PR INT : PR INT"FREQUEN2 A “ ; ! 
NT ( F ) f ” HZ" 

790 PR INT» FRI ITT "SEGNALE A*)INT(A*I 
00J/100 

795 A(0,X2)*F:A< 1 ,X2)=A:X2*X2M 

796 FOR X 1 =0 TO (X2-1) 

737 PR INTA (0,X1)JA(1,X1): NEXTX 1 
800 GET A*:1F A*< >CHR*< 133 > THEN 

800 

B 10 «-DRAU X,-60+Al ,0,X,-60,0 
820 GOTO 540 
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Veneto Ct 6, giochi, 2 libri a sole tire 

170.000, (Walter Aston, corso Orbassa - 
no 88 t 10136 Torino. Tel 01 1-392413). 

Vendo Commodore Plus 4. (Andrea 
Pruneti, via Val di Sole 14 - 20141 Mila- 
no. Tei 02-5392520). 

Vendo C64, 350 programmi a lire 
700 000 (Guido Scalmato r via Trilussa 
37 1 0401 1 Aprilia. Tei. 06-923447 ). 

Vendo stampante Commodore VPS 
803, lire 390.000 trattabili. Solo zona 
Friuli, (Aristide Vetere Rossi p vìa V. Ve- 
neto 13 1 33097 Spilìmbergo. Tei. 0427 - 
40315). 

Vendo CBV 64, registratore dedicato, 
Drive 1641, stampante MPS 803, pro- 
grammi e libri vari, (Nicola Lortzzo „ vìa 
Pisani 42, 70031 A nòna). 

Compro espansione 8?1 6 K per Vic20. 
(Alberto Ryolo, via Alciati 7, 20146 Mila- 
no. Tel. 02-4150693 ). 

Vendo Vic20, registratore, introduzione 
basic, 2 cartucce originali, 2 cassette 
M aste rtron ics, programmi vari il tutto a 
lire 200 000, (Dan tele Romano, via One- 
ro Nuova 462 , 90124 Palermo . Tei. 091 - 
440729 l 

Vendo Commodore 64, drive 1541, re- 
gistratore 1530, 2 joystick autofuoco, il 
quik disk della Philips. Il tutto a lire 

900.000. (Stefano Russoliffo, via Palo 

Laziale 53, 00055 Ladispoli tei 

9913445 l 


Vendo miglior offerente Commodore 16 
(tastiera, registratore), giochi. (Riccardo 
De Santis, via G. Pazienza 21, 71016 
San Savore - Foggia, tei 0662-21529). 

Vendo CBM 64. 2 manuali, tasto reset 
cassetta con pascal. Forth, L/M. Simon 
basic, 4 turbo, 10 giochi a scorta 11 tutto 
per lire 400,000, (Luca Minudel via 
Kennady 11 1 31015 Conegliano - Trevi- 
so . Tel 0436-34272). 

Cerco la cartuccia con microprocesso- 
re Z-80 da inserire sul Commodore 64, 
più r assemblatore Z-BO, (Vincenzo Cu- 
paiolo r piazza Bruno Pompei 1 r 00040 
Aricela - Roma , Tei. 06-9130947). 

Vendo monitor a colori Cabel 14". (Vit- 
torio Zanonl via Cario Cattaneo 42, 
22063 Cantu . Tel 031-711317). 


Waltar Ragfaellì * via Mazzini 125 - 
26013 Crema. 

Mauro Farri - via Croce Coperta 12 - 
46022 Logo - tei. 0545/27637. 

Simone Bordai - viale Biella 27 - 
10015 Ivrea - tei, 0125/251572. 

Luca Bernardini - viale dello Stadio 21 
- 05100 Terni - tei. 0744/422141 

Gianluca Giustiniani - via Raffaele 
De Cesare 6-00179 Roma. 


Vendo Commodore Vic2Q. joystick, 
cassette giochi, Il tutto a lire 150.000 
(Raul Bellomi, via Jean Jaures 8,20125 
Milano. Tel 02 2894197), 

Vendo Commodore Vic20, regtstratore 
originale, joystick, padles, varie cassette 
di programmi. Il tutto in perfette condi- 
zioni completo dt cavetti a lire f 00 000, 
(Claudio Bruzzese, via degli Olmi 71, 
00172 Roma. Tei 06-2300405). 

Vendo Commodore Plus/4 completo 
(Giorgio Sabbatint. corso XX Settembre 
18, 61043 Cagliari Tel. 0721-782789). 

Corco ZX Spectrum 48K con registrato- 
re a lire 160 OCX) Cerco allo stesso prez- 
zo stampante per Vic20, plotter. (Ales- 
sandro Mirri , wa Roberto San Severo 7, 
00176 Roma. Tel 06-2753830), 


Carlo Pezza - via S. di Santarosa 6t - 
00149 Roma - tei. 06/5281016, 

Bruno Di Gaso - via Celentano 52 - 
70121 Bari - tei. 336778. 

Andrea Belluzzi - via Voltarne 52 - 
47031 San Marino - tei. 0541/991953, 

Francesco Liperoti - via A. Grandi 22 
- 22040 Sirene ■ tei. 031/850713 

Luca Cappellini - via Marco Pelo 7 - 
20100 Milano - tei. 02/6571523 


SCAMBIATEVI LE LISTE 


Commodore Computer Club - 95 


Bruno Mialich - via Cardinal Jacopo 
Monico 23 - 30174 Mestra (Venezia) - 
tei. 04 1/914301. 

Ciro Ga&parre - via Camaktoli 12/A - 
30131 Napoli - tei 061/463867, 

Centro Programmazione Software 

via Francesco crtspi 221 - 91010 
SalemL 

Francesco Arcidiacono * via Acque- 
dotto del Peschiera 06 - 00135 Roma - 
tei, 06/334746 


Lucio Rossetto - via delle Alghe 3 - 
30126 Udo di Venezia - tei. 765639. 

Boss Club - via Porosi 10-61032 Fano 
(Pesaro) - tei. 0721/866940. 

Marco Martinelli - via Valthghe 6 - 
24030 Temo d’isola (BG) - tei. 035/ 
905196 


M. L u sardi - vìa Luigi Brerrti 6 - 40057 
Bologna - tei, 760073 


Giuseppe Spagnolo - via Crispi 37 - 

74028 Sava - tei. 099/6708878. 


Stefano Rifrange!) - via Panaro 154- 


15 Monterotondo - tei. 9000562. 


Diego Stabile * Prolungamento C. De- 
marco 32 - Napoli - tei, 446818. 

i 

Cerco urgentemente espansione per 
Vic20 selezionabile sino a 16 0 32 K. 
(Marcello Frutterò, via Valle Andrea 2, 
1 0020 Mombeflo- Tonno, Tel. 9875127). 


Massimiliano Moretto - via Carlo 
Collo 1 - 40133 Bologna - tei. 051/ 
569194 

G lati! ranco Deroma * via Italo Simoni 
2-07100 Sassari -tei, 070/272871. 

Claudio Lestan - via Dei Leoni 42/2 - 
34170 Gorizia - tei. 0481 / 32843 / 20366 . 


Antonino Bagltoft* - via Castellana 
318 - 90l35ìPalermo, 


Ugo Riccelll - via B, Corinzio 23 - 
84 100 Salerno - tei. 35022, 


Giovanni Pugliese - via A. Volta 93 - 
74 1 00 Taranto - tei. 099/41 3769. 


Cerco stampante preferibilmente bidi- 
rezionale per CBM. (Norberto Baroni, 
via Roma 109, 24030 Vercurago - Ber- 
gamo. Tel. 034 1-420581). 


Vendo C64, registratore, coprit astierà , 
joystick, 200 programmi a lire 350.000, 
(Emidio Boni, via Cetiini 44, 74029 Tal- 
sano - Taranto. Tei. 099-511761). 


UNA MOTO CAGIVA 
UN PERSONAL COMPUTER 
COMMODORE 
UN MONITOR 
O UNA STAMPANTE 
COMMODORE 
PER IL TUO COMPUTER 

Centinaia dì abbonamenti alla tua rivista Systems 
preferita 

Decine di programmi su cassetta e libri della Biblio- 
teca Informatica Systems 

Aut Min Conc 

Ritaglia e spedisci a: Systems Editoriale S.r.l. V.le Famagosta 75 20142 MILANO 


In odila qui i bolli 


Premia anche il tuo edicolante segnalando il suo 

nominativo 

edicola di via 

CAP .città 

Si □ No □ 

Trovi sempre tatua rivista Systems preferita? 

Si □ No □ 

Le riviste Systems sono sempre bene esposte? 


96 - Commodore Computer Club 
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Registrate il mio abbonamento annuale a Commodore Computer Oli it > 


Ho versato oggi stesso il canone di L 35.000 a mezzo c/c postate n*37952207 : 

a: 

Systems Editoria te - V.le Famagosta, 75 - 20142 Milano 






1 Ho inviato oggi stesso assegno bancario n.. 

per I importo di L. 35.000 intestato a Systems Editoriale 
Si prega di scriver© il proprio nome © l'indi rizzo completo ir modo chiaro e leggibile. Inviare 
ta fotocopia del bollettino di c/c postate 


Considerando che i numeri 1 , 2 e 7 sono esauriti, vogliate inviarmi i numeri arretrati 
al prezzo di L 50(30 cadauno per richieste fino a 4 numeri, o di L, 4,DQQ cadauno per 

richieste oltre 1 4 numeri arretrati e perdo per un totaledi L . Sono a conoscenza che 

i fasciali suddetti non saranno inviati in contrassegno e. pertanto. ho provveduto oggi stesso 
a versare il canone di L a mezzo c/c postale n 37952207 Intestato a* 


Systems Editoriale - VJe Famagosta, 75 - 20142 Milano 


STATISTICA 


Non posseggo un computer 

Posseggo un CB4 

Posseggo un VIC 20 

Posseggo un Commodore Plus 14 
Posseggo- un Commodore Plus 16 
Posseggo un registratore dedicato 

Posseggo un drive 1541 ............ 

Posseggo una stampante .... 

Posseggo u n mon itor 


Si □ 

no r 

SI □ 

.... no 1 

si □ 

... no Li 

Si □ 

... no 

SI □ 

.... noCi 

SI L 1 

... no □ 

si □ 

. . . no □ 

si s ri 

... no ; 1 




A Eitoio d< prova vi invio un articolo e la cassetta disco 

col programma che intendo proporre per la pubblicazione di cui garantisco l'originalità. 
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RICHIESTA ARGOMENTI 







MI farebbe piacer© che Commodore Compii ter Club parlasse ppù spesso 003 seguenti 

argomenti: 


1/ 
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Ho assegnato un voto da 0 a IO ai programmi che indico dt seguito: 

A / ; .. Volo 

8/ Voto 


■ 

■ 

■ 

■ 

■ 

■ 





INVIARE IN BUSTA 
CHIUSA E AFFRANCANDO 
SECONDO LE TARIFFE VIGENTI A: 

COMMODORE COMPUTER CLUB 

V.le Famagosta, 75 

20142 Milano 

^ÉÉMMUBÉbMI— 




INVIARE TUTTA LA PAGINA ANCHE SE SI UTILIZZA UNA SOLA SCHEDA 



24 ORE SU 24 



CONCESSIONARIA CONCESSIONARIA 

PER LA PUBBLICITÀ DI MILANO PER LA PUBBLICITÀ DEL CIRCUITO 


RADIANT 

S.P.À 


gommo color italio 

■T Srl 


PALAZZO CANOVA CENTRO DIREZIONALE MILANO 2 - 20090 SEGRATE (MI) 

TEL. 02/2155714- 2155726 - 2155734 


LOMBARDIA LIGURIA 


Milano 

Bergamo 

Brescia 

Como 

Cremona 

Pavia 


95.9-92,8-97,1 

99.3 

92-92,7 

97.1 

99.3 

95.9-97.1 


Varese 


94.9 


Genova 96,25 

La Spezia 98,7 

EMILIA ROMAGNA 

Bologna 88.7 

Piacenza 97,1 


PIEMONTE/VAL D AOSTA 

TOSCANA 


Alessandria 

104.3 

Firenze 

97,6-104.4 

Cuneo 

90.6-97,6 

Livorno 98 2-97.3-100.6 

Novara 

97,1 

Massa C, 

98.7 



Pistoia 

97.6-104.4 



Pisa 

97.3 

Aosta 

91*8-92 

Lucca 

97.3 



LAZIO 




Roma 

99,5 






PRESENTA 


\\£W < 




Mozart 

Paoli 

Pi nk Floyd i 

Polke É 

Pooh * 

Kigheti i 
Russi 

Simon & GarfunM 
Span da u tiallct 
Strauss M 

Um fur Africa 
Vivaldi 

Zeppelin _ 


. tfcarlltt 
Back 
Buglioni 
Balda» Bembo 
Baod Aid 
Beatles 
Beethoven 
Dalla 

Duran Ih» hr 
Genesi* 

King 

Listz 

Madonna 

Mina 


SS?®! 





